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M«+ for the CoCo 3 
MIDI Mods for Better Synths 

Plus OS-9 menus, 
Barden's assembler, 
games and more! / 
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Tandy 1400 HD $999* 

Tandy 1 02 32K $439 

Tandy WP-2 $279 



Tandy 2500 XL $1119 
Tandy 3000NLS869* 
Tandy 4020 SX $1679 



Tandy 1000 RL $499 
Tandy 1000 TL/3 $799 




DMM34$219* 




Color Computer Disk Drive 
Drive $239 Drive 1 $149 




TandyFax $439 



i 



BIG SAVINGS ON A FULL COMPLEMENT OF RADIO SHACK COMPUTER PRODUCTS 



COMPUTERS 

Tandy 1 000 HX 1 Drive 256K 1 79.00 ' 

Tandy 1 500 HD 1 Drive 640K 1 499.00 
Tandy2810HD1 Drivel MegRAMI 2049.00 

Tandy 1000 RL HD-1 Drive-512K 829.00 

Tandy 1 1 00 FD 1 Drive 640K 599.00 ' 
PRINTERS 

Radio Shack DMP-1 07 1 20 CPS 21 9.00 

Radio Shack DMP-302 270 CPS 469.00 

Radio Shack DMP-134 160 CPS 219.00' 

Radio Shack DMP-442 300 CPS 359.00' 

Tandy LP-950 Laser Printer 1 299.00 

Tandy DMP-240 192 CPS 8 color 415.00 

Panasonic KXP 11 80 192 CPS 189.00' 

Panasonic KXP 11 91 240 CPS 259.00' 

Panasonic KXP 1 1 24 1 92 CPS 299.00 ' 

Okidata320300CPS 369.00 

Okidata390270CPS24WireHD 515.00 

OKI Laser 400 4PPM 699.00' 

MODEMS 

Radio Shack DCM-6 52.00 

Radio Shack DCM-7 85.00 

Cardinal 1200 Baud External 99.00 

Cardinal 2400 Baud 129.00 



COLOR COMPUTER MISC 

Radio Shack Drive Controllef :'-.'. 

Extended Basic Rom Kit (28pm) 

64K Ram Upgrade Kit (2 or 8 c f 

Radio Shack Deluxe Keyboanl KB - - .- : 

HI-RES Joystick Interface I 9E 

Color Computer Deluxe Mouse 44 CO 

MultiPakPalChipforCOC03 I4JK 

COCO 3 Service Manual 29 K 

Serial to Parallel Converter 5BJ9S 

Radio Shack Deluxe Joystick 

Magnavox 8135 RGB Monitor 

Magnavox Green or Amber Monitor 

Radio Shack CM-8 RGB Monitor 

Radio Shack Pistol Grip Joystick 

PBJ OK COCO 3 Upgrade Board 24 95 

PBJ 51 2K COCO 3 Upgrade B9 DC 

Tandy OK COCO 3 Upgrade Board 39.95 

Tandy 512K COCO 3 Upgrade 129.00 

COLOR COMPUTER SOFTWARE 

TAPE DISK 
The Wild West (COCO 3) 25.95 

Worlds ol Fliaht 34.95 34.95 

Mustang P-51 Flight Simul. 34.95 34.95 
Flight16FlightSimul 34.95 34.95 



COCO Util 1 1 by Mark Data 39.95 

COCO Max III by Colorware 79.95 

MaxlObyColorware 79.95 

AutoTerm by PXE Computing 29.95 39.95 

TW-80 by Spectrum (COCO 3) 39.95 

Telewriter 64 49.95 59.95 

Telewriter 128 79.95 

Site Word 80 79.95 

Elite Calc 3.0 69.95 

CoCo3512KSuperRamDisk 19.95 

Home Publishing by Tandy (CoCo 3) 35.95 

Sub8attleSim.byEpyx(CoCo3) 26.95 

Thexder by Sierra (CoCo 3) 22.45 

Kings Quest III by Sierra (CoCo 3) 31.45 

Fight Sim II by SubLogic (CoCo 3) 31.45 

OS-9LevelllbyTandy 71.95 

OS-9 Development System 89.95 

Muto-View by Tandy 44.95 

VJP Writer (disk only) 69.95 

VTP Integrated Library (disk) 1 49.95 

Prices are subject to change without notice. Please 
at lor shipping charges. Prices in our retail store 
may be higher. Send tor complete catalog. 

'Sale prices through 4-30-91 



CALL TOLL FREE 
1-800-343-8124 

• LOWEST POSSIBLE PRICES 

• BEST POSSIBLE WARRANTY 

• KNOWLEDGEABLE SALES STAFF 

• TIMELY DELIVERY 

• SHOPPING CONVENIENCE 
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P.O. Box 1094 
480 King Street 
Littleton, MA 01460 



SINCE 1973 



IN MASSACHUSETTS CALL (508) 486-31 93 



TRS-80 is a registered trademark of Tandy Corp. 



t f,e CoCo Communit,. 




Features 



10 

Resounding CoCo 

George Quellhorst 

A CoCo 3 remake ol a popular 
music program 
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Easy Come, Easy Go! 

James Bush 

Bet a little, bet a lot... 
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Menu System Q 

Joseph Cheek 

Get there from here 

50 

Tic-Tac > 

David Ridings 

CoCo 3 returns to the classics 
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In the Limelight 

First Prize/Zebra Systems^ 
Bed/Robert W. Ruedy 



Caveman/J.r Rawlinson Software^ 
CC3F ax/Robert Gault 



Kyum-Gai -- os-9/Sundog Systems 

Level n loo\s/Alpha Software Technologies . 
Math. I Library/e/te-A/-eyfes 



SoundTrax Instrument Disks/Sundog Systems 
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MIDI Mods 

Cecil C. Houk 
Fighting back against barely suffi- 
cient synthesizer designs 



, TherassetteBpedsksyrrtcfe 
beside features and columns 
indcate Ihat the program listings with 
IhosearHesaeonterncrlhsFV^ 
BOWCNTAPEandrWfiOWON 
DISK "Those wih cny the dsk symbol 
are not available on RAINBOW ON 
TAPE For details, check the RAIN- 
BOWONTAPEardr^NBOWON 
DISKadcn PAGES 




Departments 



Advertisers Index 

Back Issue Info 

Letters to Rainbow 
Received & Certified 
Submitting Material _ 
Subscription Info. 



81 
80 
_4 
74 
42 
23 



THE RAINBOW is published every month ot the year by FALSOFT, Inc.. The Falsoh Building. 9509 U.S. Highway 42, P.O. Box 385. 
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A Sound Situation 
Editor: 

Over the last couple of years. 1 have 
been building a MIDI music studio. My ESQ- 
I Keyboard (EMSONIQ) has a built-in se- 
quencer, but editing is a pain. Shopping for 
computers with MIDI capability was a de- 
pressing adventure. Then. 1 saw ihe Micro- 
corn ad for MIDI hardware and software for 
the CoCo 3. Do you have any other infor- 
mation on CoCo 3 MIDI applications or 
product review s? Your help is appreciated. 

Sean Edwards 

P.O Box 105 

\!t , han'u •sburg, tt 62545 

See the review qj CoCo MIDI Pro on 
Pane 74 of the February 1991 issue. Two 
other products to consider are Lyn. from 
Rutqford Research, and I ItiMusE m.fmm 
Second City Software Read Jeffrey 
Parker's "Play il again, CoCo" 'December 
19X9. Pa^e ?4 1 for an overview of MIDI and 
the CoCo 

Clearing the Air 

Editor: 

I would like to tel I you about a scam that 
I think is going on. Lasi spring when all the 
hype started about a CoCo 4. a company 
called Kenneth-Leigh Enterprises adver- 
tised in your magazine about its new com- 
puter. I wrote for information, which I 
received. There was a special newsletter 
advertised for S9.95, which v. as supposed to 
start in July. The newsletter was to inform 
interested parties about updates, new soft- 
ware, and so on. 1 never received anything, 
but they cashed my check. I wrote several 
months ago asking for a refund. I have 
since bought a Tandy lorm j\jl and sub- 
scribe to PCM. so now I don't want the 
newsletter. I did not get any reply, nor did 
I receive a refund. 

Kenneth C. Brownson 
Newark. Delaware 

THE RAlNBOWs advertising manager. 
Ira Barsky. contacted Kenneth-Leigh En- 
terprises (now known as Interactive Media 
Systems). Following is IMS' reply: 

Dear Ira: 

It was with great pleasure that Interac- 
tive Media Systems. Inc.. received your fax 
concerning Ken Brownson 's order for our 
newsletter. It shows once again that THE 
RAINBOW, like IMS. is dedicated to cus- 



tomer service. 

After a very pleasant and productive 
chat with Mr. Brownson, I asked our North 
Carolina offices to send Mr. Brownson a 
refund and a free subscription. Even though 
Mr. Brownson has left the CoCo world, we 
noted that he was still interested in our 
coverage of the PC-compatible multimedia 
standards just announced by Microsoft. IBM 
and Intel. 

Naturally. IMS will have no association 
with "scams," as Mr. Brownson under- 
stands. We strive to provide our customers 
with the quality and consistency they have 
come to expect from the Color Computer 
industry — espcially as exemplified by THE 
RAINBOW, which has been the best source 
of information for the Tandy CoCo for a 
decade. 

We're happy to have resolved this snafu 
with Mr. Brownson. Thank you for giving 
us the opportunity to help out. Ira. 

Paul K. Ward 

President 

Interactive Media Systems. Inc. 

Programmers Take Notice 

Editor: 

I spend a lot of time entering listings 
from THE RAINBOW and. like many others. 
I have difficulty with the 3-column listings. 
But I can accept this if it means more 
listings per issue. 

However, I suggest that programmers 
could make things easier for readers who 
have difficulty entering the smaller listings 
if they would avoid the use of "I" and "Q" 
as variable labels. These are not easy to 
distinguish from "1" and "O". 

Keiran Kenny 
Cremorne. NSW, Australia 

Kudos 

Editor: 

I would like to publicly thank Mr. Tom 
DiMarco of Gimmesoft for the fine service 
he gave me during the holidays. He called 
me at home to tell me he was temporarily 
out of a certain program I had ordered for 
Christmas. He then went out of his way to 
ship a substitute by Express Mail so I would 
receive it by Christmas. This is truly out- 
standing service. 

Two other RAINBOW advertisers are also 
worthy of mention: Computer Plus and 
Dayton Associates. I recently ordered prod- 
ucts from both and in each case had the 
items in my hands less than 4S hours after 
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COCO HARDWARE CATALOG 



UPGRADES 

51 2K UPGRADE: No Soldering. Comes with easy picture 

nstructions and $100 worth of software (512K Ramtest / Ramdisk / 

Spooler / Backup Lightning & OS9 Level II Ramdisk). $99. 

OK Board (w/ software): $39 

1 MEG UPGRADE (from Disto). $199. (0 K: $149) 

64K Upgrade for CoCo l/ll: $29 

MONITORS 

MAGNAVOX 1CM135 RGB: Razor sharp picture, 14 
screen, Stereo sound, speaker, Tift Swivel Stand & 2 Year! 
Warranty. For CoCo 2 & 3. $298 
MAGNAVOX COC03 RGB CABLE: $19.95 

DISTO PRODUCTS 

Disto Mini Controller: $74.95 

Disto Super Controller: $99.95 Super II: $129.95 

Eprom Programmer Add-on: $54.95 

Hard Drive Adapter: $39.95 w/ RS232: $69.95 

3-in-1 Multi-Board Adapter: $74.95 

4-in-1 Mufti-Board Adapter: $129.95 MEB Adapter: $35 

RS232 Super Pack (replacement for RS232Pack): $54.95 

COMMUNICATIONS 

Communications Extravaganza 2400: iinciudes Zoom 
2400 Baud Modem, Cable, Autoterm Software & CompuServe 
Access Offer & free access time. : $1 69.95 

Communications Extravaganza 1200: $109.95 
Avatex 1200 Modem (w/ 2 yr warr.): $85 
Zoom 2400 Modem (w/ 7 yr warr.): $129 

EPROM 

Intronics EPROM Programmer: Programs 2516,27xx/xxx 
EPROMS. Includes docs and software. CoCo 1,2,3: $137.95 
DATARASE Eprom Eraser: $49.95 
BOTH Programmer & Eraser: $179.95 
2764 Eprom: $8 27128 Eprom: $9 

BLANK CARTRIDGE (Disk Cont. Size): $9.95 

KEYBOARDS 

6 Feet Keyboard Extension Cable: $39.95 
CoCo 3 Keybd: $39.95 w/ Ext Cable: $69.95 
CoCo 2 Keybd: $29.95 w/ Ext Cable: $49.95 

CHIPS 

Genuine RSDOS 2.1 Disk Chip: $29.95 
68B09E Chip: $1 4.95 CoCo 3 GIME Chip: $49 
Multipak PAL Chip Upgrade Kit w/ instructions 
(specify Multipak Model #26-3024/3124): $19.95 



FLOPPY DRIVE SYSTEMS 

Our Drive & 2 Drive Systems included BRAND NEW Doublel 
Sided Drives, Disto Mini Controller (with ROMs to access both 
sides of the drive), Official 200-page Radio Shack Manual & $60 
worth of software. 

Drive 0: $1 99 2 Drive System: $299 

Drive 1 : $129 Bare 5 1/4" Drive: $89 
Cable fori Drive:$16.95 2 Drives:$22.95 4 Drives:$34.95 
FD501 Upgrade Kit & Instructions: $109 
FD502 Upgrade Kit & Instructions: $119 
Toshiba 3 1/2' Drive w/ PS & Case: $149 
Toshiba 3 1/2* Bare Drive: $89 



HARD DRIVE SYSTEMS 

Hard Drive Systems include Seagate Hard Drive. Western Digital 
Controller, Cables, CoCo XT Interface, Case (with fan, Power] 
Supply & room for second drive), software & instruction manuals. 
Assembled/tested/formatted. Ready to Plug'N' Run. 

Seagate 20 MEG System: $459 
Seagate 40 MEG System: $549 

From Burke & Burke... 
CoCo XT Interface: $69.95 w/ RTC: $99.95 
CoCo XT ROM: $19.95 
HYPER IO: $29.95 HYPER III: $12.95 



512K COCO 3 

Comes with complete manuals &$100 worth of software 
Only $259. Note: 512K Installation Voids Warranty. 

CABLES & INTERFACES 

Magnavox 8505/851 5/8CM643 Cable: $24.95 

Magnavox 1CM135 RGB Cable: $24.95 

Serial-to-Parallel Interface: $44.95 

1 5' Shielded Multipak Extension Cable: $36.95 

40-pin Y Cable: $34.95 

RGB Analog Extender Cable: $19.95 

Modem Cable (4 pin to DB25): $19.95 

RS232 2 Position Switcher (4 pin): $29.95 

Hi-Res Joystick Interface: $1 1.99 

Other Good Stuff... 

Advanced Gravis Joystick: $59.95 
Deluxe 2 Button Joystick: $16.95 
Multipak Locking Plate (spec. Model #): $8 
5 1/4' DS/DD Disks: $.40 ea 3 1/2": $.79 ea 
NX1 000 Ribbon: $8.50 Color Ribbon: $12.95 
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MICROCOM SOFTWARE «1387 Brighton Henrietta Town Line Rd •Rochester.NY 14623 
To Order: All orders $99 & above (except Printers, Drives. Monitors, Computer) shipped 2nd Day Air at no extra Charge in Continental 
US. We accept Visa,MC,Discover,Amex (3% sur), check, MO & School PCs. COD Orders (<$100) within US add $5 extra. Please add 5% 
shipping (min $3) S&H in US & 10% (min $5) for Canada, Alaska & PR. All foreign orders except Can. pay actual shipping charges (min 
$5) . NYS residents please add sales tax. Monitors ($12 S&H/S40 in Can.); Drives ($10 S&H/$30 in Can); Computers ($8 S&H; $25 in Can). 
For Orders (10-5) pm M-Sat: 1-800-654-5244. Tech Info & Order Status (3-5 pm): 716-292-1786 



calling in the order. That's fast! (Though. 
UPS also deserves some of the credit.) 

In this period of declining support from 
Radio Shack, we in the CoCo Community 
are very fortunate to have such excellent 
mail-order companies supporting us. There 
is no reason to fear ordering from any 
RAINBOW advertiser. Over the past few 
months 1 have purchased over a thousand 
dollars worth of hardware and software for 
my Color Computers from RAINBOW ad- 
vertisers, large and small, and in every case 
the service wascourteous. helpful, and very 
prompt. RAINBOW advertisers deserve our 
support! 

I know a lot of people gripe about the 
shrinking size of the magazine, the differ- 
ent binding, and the smaller type for the 
listings. I just want you to know that 1 think 
you are doing a fantastic job in the face of 
declining advertiser revenue. Let's face it, 
we are in the twilight of the Color Computer 
era. All magazines for the Commodore 64/ 
1 28 have passed from existence. Incider for 
the Apple has a subscription base over four 
times as large as that of THE RAINBOW (I 
checked), yet the magazine is even thinner 
and not nearly as informative. Of course, 
people who bought other computers aren't 
nearly as intelligent as we CoConuts . . . 

Thomas Faun 
Akron, Ohio 

Thanks for the kind words and the real- 
istic understanding of our position. 

Graphically Speaking 

Editor: 

Is there a way to scroll text over a Hi -Res 
picture without affecting it? How can I save 
pictures in memory and then use them to 
make animation? 

Raul Guido Rosey 

Box 402 

Boqueron. Puerto Rico 1)0622 

We know of no easy way to scroll text 
over graphics without disturbing the im- 
age. However, several articles have ap- 
peared in past issues that offer insight into 
various methods you can use for this, as 
well as for graphics animation. 

Computer Expo 

Editor: 

I am the president of the Modem Sup- 
port Group (M.S.G.) of Michigan and have 
the privilege of overseeing the telecom 
activities of this year's MAXIT Computer 
Show, MAXIT (Michigan Annual Expo of 
Information Technology) is sponsored each 
year by the Michigan Computer Consor- 
tium (organization membership consists of 
area computer clubs). Our computer shows 
began in 1986. The best attendance to date 



has been 5,000. We hope to exceed that 
number for this year's show. Our mid- 
Michigan area Tandy Color Computer and 
OS-9 users are participating in MAXIT '91. 

MAXIT -91 will be held on Sunday. April 
21. from 10 a.m. to 5 p.m. at the Clarion 
Hotel in Lansing, Michigan. General ad- 
mission is S3. Children 12 and under are 
admitted free. For more information, con- 
tact Skip Osterhus, P.O. Box 6452. East 
Lansing. Ml 48826, or call the MAXIT Voice 
Hotline by dialing (5I7)-487-6l80 (use voice 
mailbox 629). 

John C. Evan. 1 ', Jr. 
Lansing, Michigan 

Interested in Ham Radio 

Editor: 

First. I would like to add my thanks to 
THE RAINBOW for your 10 years of pro- 
grams, articles, and product reviews. You 
have helped this reader become computer 
literate. Also, my thanks to the many adver- 
tisers who support our little jewel — espe- 
cially Microcom Software (it's a shame 
more of your readers don't live as close as 
I do to meet these fine people in person) and 
T&D Subscription Software, whose service 
is always excellent. 

Also, can anyone help me find public 
domain software tor amateur radio? I am 
interested in any programs for either Disk 
BASIC or os-t. v. ith emphasis on using the 
CoCo 3 to receive cw via software and a 
simple cable interface. I would gladly pay 
for the media, either tape or disk. Thanks 
again RAINBOW ! 

Ed Howell 
I Iu2 Leicester Road 
Caledonia, NY 14423 

Something for Any Occasion 

Editor: 

Somebody once said "Never judge a 
book by its cover." I don't know who it was. 
or what type of books were being talked 
about, but when it comes to THE RAINBOW 
the saying should be changed to: "never 
judge the magazine b) its size." As I renew 
my subscription for another year I'd like to 
explain what I mean. 

I have continuous issues of the magazine 
dating back to January 1985. In every issue 
there has been some article, program, or 
letter that has taught me something new 
about my CoCo, or about » riting programs 
for it. When I upgraded from a CoCo I to a 
CoCo 3, the information was there. The 
information was also there when I went to 
5I2K. when I changed disk drives, when I 
added a hard disk, when I modified a Multi- 
Pak. when I started using OS-9. and when I 
joined Delphi. As far as I know, there isn't 
another computer magazine that can walk a 
person through changes and upgrades like 



this without any other form of help. 

There's still a world of things I want to 
do with my CoCo and I know I can count on 
THE rainbow to help me learn to do them. 
Although THE RAINBOW has lost a few pages 
since January 1985. it's still packed full of 
information and ideas that can't be found 
with any other single source. And. for 
anyone who thinks it's strange to hold on to 
back issues like I do, there's an article in the 
January 1985 issue about C programming 
that I still haven't read. But when I'm ready, 
it'll be there. 

I don't know how you've kept the sub- 
scription price unchanged for so long, but 
here's my check for anotheryearof this fine 
magazine. And I'm sure I'll be doing the 
same thing in another year. You know. THE 
RAINBOW really could have beencalled The 
Diamond, because it's a true gem among 
computer magazines. 

Robert W. Kemper 
Ft. Stewart, Georgia 

Thanks — we needed that! 

Serial Parallel Dilemma 
Edit 

;ndy purchased a parallel printer 
and have no way to connect it to my CoCo 
3. 1 1 am currently using a serial printer.) I 
ha^e heard there is a converter available 
that allow > this, but no one has been able to 
tell me where I can get one. The parallel 
printer is 3 Wright Hand 1200L printer. I 
hu\ e the caWe for the printer, but as you 
know the CoCo 3 only has a 4-pin connec- 
tor for an output. The cable for this printer 
lias 25 pins. This is where I need the con- 
vener What can you do to help me? 

Donald H. Taylor 

: S Miriam Street, #2 

Claycomo. MO 641 19 

■\ seriat-to-parallel converter can be 
used data coming from 

the four-pin p, r on the CoCo' s backside to 
a parallel font. Such devices are available 
from a nm mt u of RAINBOW advertisers, 
including Dayton Associates, Microcom 
Software and Super soft. 

The Search for Flippies 

Editor: 

This is in response to the letter from 
Roger Ranee, which appeared in the January 
1988 issue of THE RAINBOW. Like Roger. I 
had difficulty finding flippy disks. In fact, 
several deakn< including one Radio Shack 
store) insisted that there was no such thing. 
Others would correct me and say. "oh. you 
mean flopp\ disks!" 

A compare :.-^t used to advertise in THE 



mued on Page 76 



THE RAINBOW April 1991 



COCO SOFTWARE /BOOKS CATALOG 



Word Power 3.3 

(The Ultimate Word Processor for CoCo 3) 
[This power-packed word processor features: • Blazing Fast 2 Mhz Speed »72K (460K on 51 2K) available text 
memory #40/80 column display •Pull down menus •Full screen editor •Extensive editing & delete commands 
•Key click.typeahead, tabs, word count & OOPS recall •HELP screen • Spooler, Sort, Mail Merge , Split Screen 
Editing & Graphics Support «Pop-up calculator «2 Column & Macro Support •Save/load w/ Automatic Backup 
•Works with any printer •What You See Is What You Get Display •Allows Printer Option Codes Embedding 
•80,000 word spelling checker •Punctuation Checker •Complete Documentation. Only $79.95 



BOOKS 

500 Pokes Peeks & Execs: $16.95 

Supplement to 500 Pokes Peeks & Execs: $9.95 

300 Pokes Peeks & Execs for CoCo 3: $19.95 

All 3 Poke Peeks & Execs Books: $39.95 

Extended Color Basic Unravelled: $39.95 

Disk Basic Unravalled: $19.95 

Both Extended & Disk Basic Unr.: $49.95 

Super Extended Basic Unravelled: $24.95 

All 3 Unravalled Books: $59.95 

CoCo 3 Service Manual: $39 Coco 2: $29.95 

Multipak Service Manual (specify model #): $19.95 

Full Turn of Screw (Disto): $19.95 

Assembly Language Programming: $18 

Addendum for CoCo 3: $12 

Start OS9 Book & Disk: $32.99 

Inside OS9 Level II: $29.95 

Complete Rainbow Guide to OS9: $19.95 

Complete Rainbow Guide to OS9 Disks: $29.95 

Rainbow Guide to OS9 II: $1 9.95 Disks: $1 9.95 

OS9 SOFTWARE 

From Alpha Software Technologies... 

Data Windows: $59.95 Data-Merger: $19.95 
Presto Partner: $29.95 Level II Tools: $24.95 
Disk Manager Tree: $29.95 Zapper: $1 9.95 
Multi-Menu: $19.95 Warp I: $34.95 
OS9 Level II BBS: $29.95 

From Burke & Burke... 
RSB: $39.95 EZGen: $19.95 Wild Card MV:$19 

From Kenneth Leigh Enterprises... 
Start OS9 Book & Disk: $32.99 
Goldberg Utilities Vol I: $24.95 Vol II: $24.95 

Other Software... 
GSC File Xfer: $44.95 Multi-Vue Version: $54.95 
SDISK 3: $29.95 SDISK: $29.95 
OS9 RAMDISK (for 512K & 1 MEG): $29.95 
Screen Control Utility: $19.95 Menu. Util: $19.95 
Point-&-Shoot File Selection: $19.95 



RSDOS SOFTWARE 

From Zebra Systems:... 

CoCo Graphics Designer Plus: $29.95 
Pictures, Fonts & Border Disks: $14.95 ea 
Label Designer: $29.95 First Prize: $69.95 

From Colorware... 
CoCo Max III: $39.95 Fonts (95): $29.95 
Max 10: $34.95 Fonts (36): $14.95 
CGP220/NX1000 Rainbow Driver: $14.95 
Max Edit: $14.95 SP Checker: $14.95 

From Musicware... 
Musica II: $29.95 Lyra: $49.95 
CoCo Midi Interface: $99.95 Software: $59.95 

From Hicrocom... 
Color Schematic Designer: $39.95 
Super Tape/Disk Xfer: $24.95 
Disk Label Maker:$1 9.95 Screen Dump: $1 9.95 
VCR Organizer: $19.95 Bowling Score: $19.95 
Maillist Pro: $19.95 Comput. Checkbook: $19.95 
RGB Patch: $24.95 

Other... 

MP Database III: $69.95 VIP Calc III: $69.95 
Autoterm: $39.95 Vterm: $39.95 
CoCo Util II (Xfer between IBM & Coco): $39.95 
Xenocopy: $79.95 Telewriter 64: $57.95 
ADOS 3: $34.95 Ext. ADOS 3: $39.95 

Call for Cercomp Products. 

GAMES 

[Treasury Pack #1,2 (8 Games ea): $29.95 ea 
Space Pac (8 Games): $29.95 
Classic Pac: TP1.TP2 & Space Pac: $69.95 
Slots & Cards:$39.95 Kyum Gai: $29.95 
Sinistar: $34.95 Quest for Thelda: $34.95 
The Contras: $34.95 Crystal City: $34.95 
Wizards Castle: $19.95 Pinball Factory: $34.95 
Fury: $24.95 Speed Racer: $34.95 
Time Bandit: $29.95 Outhouse: $19.95 
Cashman: $29.95 Demon Seed: $19.95 



MICROCOM SOFTWARE «1387 Brighton Henrietta Townline Road •Rochester,NY 14623 
To Order: 1-800-654-5244. Tech Info: 716-292-1786. (See Page 7 for Ordering Information) 
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CoCo Hits a High Note 



I have always been sort of addicted to 
music and sounds. Unfortunately, 
music (but, perhaps, not sounds) has 
never been addicted to me. 
My mother could sing pretty well 
— or at least I thought so — and encour- 
aged "family sing-alongs" in the car when 
traveling. My father was not much of a 
singer and was known chiefly for his rendi- 
tion of "I'm Forever Blowing Bubbles", 
which (fortunately ) was usually voiced in a 
humorous vein. 

Mother decided, of course, that / was an 
outstanding singer and. after appropriate 
consultation with school authorities, en- 
rolled me in private singing lessons with 
Miss Bessie Rice, well-known in Birming- 
ham. Alabama (where I grew up), as a 
wonderful teacher of voice. 

I was about 12 and a "child soprano." as 
my mother and Miss Bessie put it. My 
school selected me as its representative to 
the All County Chorus. And one year I sang 
with other kids in front of a whole lot of 
people. 

Lessons from Miss Bessie were two 
days a week. Mother dropped me off. went 
home for 45 minutes or so. and came to get 
me. During my hour. Miss Bessie played 
the piano and I sang songs she (or some- 
times I) wanted me to sing. I even practiced 
some at home. 

One fateful day about this time of year, 
the beginning of spring when the sap was 
starting to rise. Miss Bessie was leading me 
through "I Believe" when I got to the part 
where I was supposed to sing "I believe" 
three times, each one a little higher in pitch 
than the last. I didn't make it through the 
last one. My voice cracked. 

Miss Bessie stopped playing, got up 
from the piano, went to the telephone, and 
called my mother. 

"You might as well come and get him." 
she said. "His voice is changing." 



I never saw Miss Bessie again. 

I was never asked to sing in public again, 
either. 

However. I have never fully convinced 
im self that 1 cannot sing and have always 
I iked to make music. For that reason, music 
on the Color Computer has always held me 
in Fascination. 

I think sometimes we see these pro- 
grams, of which there are several, in THE 
kmnbow and think they are for "musi- 
cians" who compose their own songs. This, 
of course, is true and there are a lot of 
musical talents out there who do. indeed, 
write music on the CoCo. 

I cannot write music, either. But I like to 
play it and sing along. And, really, all it 
lakes is a song book, a CoCo. and one of the 
music programs offered by a number of 
people on these pages. 

Cecil Houk. as you know, opens all of 
our RAINBOWfests with "The Star Spangled 
Banner." While Cecil is a musician who 
has "arranged" our national anthem. I have 
successfully duplicated it in a simple one- 
voice song which sounds pretty good. 
Moreover, it was fun to do. 

Unfortunately, the family of which 1 am 
the father takes an even dimmer view of my 
singing than the family of which my father 
was the father. So there are not many sing- 
alongs. Still, now and again, the songs that 
are family favorites get keyed in and / have 
a fine time singing with the computer. 

I honestly think this is an enjoyable use 
which may have been overlooked in com- 
puter music. And maybe it is one your 
family might like to explore. Best of all, 
you can have all your favorite songs on a 
disk and just go from one to another. 

And CoCo can still hit the high Cs in "1 
Believe." 

— Lonnie Falk 



THE RAINBOW April 1991 



Save Time and Money with a Combination Subscription! 



SAVE up to 19% 

when you buy a joint sub- 
scription to the magazine and 
either rainbow on tape or 
rainbow ON disk! A one-year 
subscription to the rainbow 
and rainbow ON tape is only 
$91 in the U.S., $108 in Can- 
ada, $153 foreign surface rate 
and $188 foreign airmail. A 
one-year subscription to THE 

RAINBOW and RAINBOW ON 

DISK is only $115 in the U.S., 
$138 in Canada, $183 foreign 
surface rate and $218 foreign 
airmail.* 

Every month, these convenient 
services bring you as many as 24 
ready-to-run programs. Using the 
current issue of the rainbow as 
documentation, all you have to do is 
load and run them. A one-year com- 
bination subscription to the rain- 



bow and rainbow on tape or rain- 
bow on disk give you more than 230 
new programs! The typing time you 
save can be spent enjoying your 
CoCo! 



RAINBOW ON TAPE - 
For No-Fuss Fun 

Back issues of rainbow on tape 
are available beginning with the 
April 1982 issue. A single copy of 
rainbow ON tape is $10 within the 
United States; U.S. $12 in all other 
countries. The annual subscription 
rate for rainbow on tape is $80 
within the U.S.; U.S. $90 in Canada; 
and U.S. $105 for all other coun- 
tries.* 



RAINBOW ON DISK 
Offers OS-9 Programs 

In addition to all the programs 
offered on tape, part of one side of 
rainbow on disk is formatted for the 
OS-9 operating system. That means 
you can now get all the OS-9 pro- 
grams from the magazine — pro- 
grams that cannot be put on tape. 
Back issues of rainbow on disk are 
available beginning with October 
1986. Subscriptions to rainbow ON 
disk are $99 a year in the U.S. Cana- 
dian rate is U.S. $115. All other 
countries, U.S. $130. Single copy 
rate is $12 in the U.S.; U.S. $14 in 
Canada; and U.S. $16 in all other 
countries.* 



To order by phone (credit card orders only), call (800) 847- 
0309, 9 a.m. to 5 p.m. EST. All other inquiries call (502) 228- 
4492. 

Look for our envelope located between pages 66 and 67 for 
ordering individual subscriptions to the rainbow, rainbow on 
tape and rainbow on disk. 



YES! Sign me up for a joint 1-year subscription (12 issues) to: 



D THE RAINBOW and RAINBOW ON TAPE 
□ THE RAINBOW and RAINBOW ON DISK 
D NEW □ RENEWAL (attach labels) 



Name 



Address 
City 



State 



ZIP 



Payment Enclosed □ ('payment must accompany order) 
Charge: □ VISA □ MasterCard □ Am. Express 

Account Number 

Signature 



Exp. 



•U.S. currency only, please. On order to hold down costs, we do not bill. Kentucky residents add 6% sales tax; Canadian residents. 7% GST. Please allow 6 to 
8 weeks for delivery ot first copies. Joint subscriptions to the rainbow and rainbow on tape or rainbow on disk begin with the current issue. 

Please nole: While group purchases ot RAINBOW ON TAPE and RAINBOW ON DISK are permitted (and multiple subscriptions are even discounted, it purchased in one 
order from a club), no license to make copies is conveyed or implied. Yes, your group may even purchase a subscription to our disk/tape services, but such purchase 
in no way authorizes that any copies be made of that original disk/tape Specifically, this means that the original disk/tape itself may indeed be kept in a club Horary 
tor use by members However, a group purchase does not entitle club members, individually or as a group, to copy that disk/tape 
Unauthorized copying of any copyright product is strictly illegal. The copyright (right to make copies) is in no way conveyed in the purchase transaction 
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A CoCo 3 remake of a popular music program 



Resounding CoCo 



Ever since our family has had a 
Color Computer we've made 
music with it. Each music proc- 
essor we acquired was tried, 
examined, and finally put aside to be re- 
placed once again with the Music+ pro- 
gram first published in the June 1984 issue 
of THE RAINBOW ( updates appear in the 1 986 
and 1987 June issues). We did not replace 
Music* until we bought a third-party music 
processor. For a while everyone in our 
house was happy. But. alas, the time came 
when I wanted to enter a song called "El- 
vira Madigan," and our commercial proc- 
essor did not have the range required for 
this song. So, back we went to the good old 
standby, Music+. It did have the required 
range, but entering a complicated piece of 
music was an almost impossible task, espe- 
cially with the small five note window. It 
was at this point that my son jokingly- 
remarked that perhaps I should write a new 
screen editor for Music+ using the Color 
Computer 3"s HSCREEN. After some serious 
thought I decided to give it a try, although 
I did not think at the outset BASIC would be 
fast enough to do the job. or that enough 
memory would be available. After six 
months of "spare time." and some tricky 
programming, the task was accomplished. 
"Elvira Madigan" was entered, and any 
bugs that may have been left in the new 
music editor were quickly found and fixed. 
The result of my effort is Music3+. a 
screen editor for Music+ that uses HSCREEN 
4. It is very user-friendly and uses real 



George Quellliorst has had a CoCo since 
the days of4K. He has two CoCo 2s and a 
CoCo 3 with an RGB monitor. He enjoys 
writing programs with his computer equip- 
ment. He can be contacted at 63 S. State 
Street, Apt. 10. Painesville. OH 44077. 



by George Quellhorst 



notes, not numbers or letters. It has a 17- 
column. 68-note window, does everything 
Music+ does, and sports a few other added 
features. You can Play starting from the 
cursor position. Move-Play with a start and 
end input, and Copy to the end and/or 
middle of your music file. Music3+ is fully 
compatible with Music+. Any Music+ file 
can be loaded into Music3+. 

An "on HSCREEN." ON ERR GOTO routine 
was added (mainly for Disk I/O) to prevent 
the computer from leaving the H SC R E E N and 
ending the program. For example, if you 
enter a non-existing filename, the program 
allows you to enter another filename with- 
out having to run the program again. 

Two additional bonuses are the added 
machine-language routines for Insert and 
Delete. The original BASIC program took DA 
minutes to delete or insert the first column 
of notes in a 1200-column file. Since I had 
never written a machine-language program 
before, I got William Barden Jr.'s book. 
TRS-80 Color Computer Assembly Language 
Programming, off the shelf and managed to 
write the two routines. Now it takes less 
than X A second to insert or delete the first row 
of notes in a 1200-column file. The machine- 
language routines are loaded in memory 
just below the existing CLEAR routine. The 
CLEAR statement in Line 1 was changed 
from &H4CBF to &H4C88 to make room for 
the added routines. 

Another "goodie" is the playback of 
music in the high-speed mode of the Color 
Computer 3. It doubles the sampling rate of 
the synthesizer to the DAC converter. This 
doubles the frequency response of the 
computer and makes the final result sound 
1 00 percent better. Your music sounds even 
better if you install a speaker output jack in 
your monitor and use a better speaker to 
play your creations. Better yet, run the 
audio signal to a stereo system. 



Playback in the high-speed mode raised 
the pilch of the music by an octave. To 
remedy this, the note table (which is poked 
into memory as the program is loaded) had 
to be changed. One octave was removed 
from the top of this table. The values needed 
to add a lower octave were calculated and 
added to the bottom of the table, thus low- 
ering the pitch of the synthesizer by one 
octave. Unfortunately, this process created 
an incompatibility with existing Music* 
files. When they are played with Music3+, 
they sound one octave higher than they 
should be since the note table is saved to the 
disk along with the music. To make every- 
one happy, and to keep the two programs 
fully compatible. I added a conversion util- 
ity. To convert your old files, simply load 
them into Music3+ and press F2. The new 
note table is poked into your old song, the 
tempo is divided by two, and the new value 
is poked in as a permanent part of the song. 
The whole process takes less than two 
seconds. Now save the song to disk and the 
conversion is complete. It does no harm to 
convert a song more than once. However, 
an error-trap routine prevents you from 
converting the same song twice. When you 
press F2. the program checks if the correct 
note table is in memory. If so, the warning 
buzzer sounds and nothing else happens. 

Finally. I added Directory and Drive 
Change commands. Pressing 0. 1 , 2. or 3 
while at the Main menu sets the drive speci- 
fied and displays the directory with the free 
granules in five columns on the 80-column 
screen. A POKE 59078.51 preserves the 
HSCREEN. Pressing any key on the keyboard 
instantly puts the HSCREEN with your music 
back on your screen. 

Since I received the dreaded Out of 
Memory error while working on this pro- 
gram, I made two compromises. First, all 
the values in the DATA statements were 
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converted to Hexadecimal, saving 299 bytes 
of memory. Also, all the REM statements 
were removed, which saved another 812 
bytes for a total of well over I K of memory 
space. For those who might be interested, 
the REM statements are shown in Figure 3. 













; 


; 


c 




f * 


NHS 


_ 


D 


■ 


- 


• 


- 


■ 








Iflfl* 


I 


: ; 


1 1 




• 


■ 


1 u 






H ' : 


c 












* 

































Figure 1 



Entering the Program 

For those of you who do not receive 
RAINBOW ON TAPE or RAINBOW ON DISK, a 
few notes are in order before you start 
entering the listing. The funny looking 
character in Line 37. immediately after 
TI-INT( 128/2. is called a caret. This char- 
acter is generated by pressing the up-arrow 
key. The lower case g in Line 1 1 must be 
entered by pressing the Fi key. and the 
reversed slash in Line 57 is generated by 
holding SHIFT and simultaneously pressing 
the CLEAR key. 

Using Music3+ 

The following information is printed on 
the screen at all times: Tempo, drive num- 
ber, current memory location (which in- 
forms you where in the music memory the 
cursor is located), high memory indicator 
(which shows the highest memory location 
the cursor has reached), cursor note (printed 
in red), and number of the last note in the 
file. Music3+ allows a total of 2498 col- 
umns. A single note consumes five mem- 
ory locations, one for the length of the note 
and one for each voice. Therefore, the note 
counter advances or decreases by one when 
the cursor is moved right or left, while the 
memory location counter advances or de- 
creases in increments of five. Music3+'s 
buffer starts at 20258. which is the number 
printed on your screen as the current 
memory location when no music file is in 
memory. 

I inadvertently pressed BREAK several 
times while trying to press the up arrow, so 
I disabled the BREAK key by poking a value 
of 255 intoaddress4i598. (SHIFT-BREAK still 
works.) The BREAK key is restored to nor- 
mal each time you press SHIFT-BREAK. 
Pressing SHIFT-BREAK and running the 
program again does not erase the music in 
memory. 

Music3+ has two menus. The Main menu 
is displayed when Music3+ is run for the 



first time. The second menu is the Music 
Entering menu. The two menus can be 
toggled by pressing Fl. This does not, 
however, switch to the music scoring part 
of the program. 

Entering Music 

Automatic key-repeat is always in effect 
for the four arrow keys. Music is entered 
with the help of the cursor, which looks like 
an equal sign (=). It is located at the far left 
side of the screen at the middle C position. 
Notice you can move the cursor up and 
down, but not to the left or right. You 
cannot, at this time, enter music to the left 
of the cursor since you are at the beginning 
of the music buffer. Nor can you enter 
music to the right of the cursor, since you 
have not yet entered music at the current 
cursor location. The rule is that the cursor 
cannot be moved further to the right, or 
higher in memory, until a note or rest has 
been entered at the current location. This is 
to prevent you from accidentally leaving a 
blank spot in the music memory, which 
signals the computer that the end of the 
music file has been reached. 

Press Fl to switch menus (not necessary, 
but it helps) and move the cursor to the 
position on the music bar where you plan to 
enter a note. As you move the cursor to the 
top or bottom of the screen, little help lines 
are drawn on the screen to help you locate 
the desired note position. This only hap- 
pens when the up or down arrows are 
pressed. The lines drawn by the cursor 
remain on the screen until you have entered 



The arrows also have a wrap-around 
feature. For example, when a '/m note (the 
shortest note available) is displayed on the 
screen, pressing the left arrow causes it to 
be changed to a whole note. Conversely, 
pressing the right arrow while a whole note 
is displayed changes it to a '/m note. Com- 
mon note values are carried through, mak- 
ing it easy to enter repeated note lengths. In 
other words, the next time you press the 
space bar. the last note length used is drawn. 
The last note displayed on the screen be- 
comes the immediate default after loading 
a music file. Since all four notes in a single 
location must be the same length (the 
computer cannot play a whole note and a 
quarter note at the same time), all note 
lengths in a single row or location are 
changed to the value of the note displayed 
after pressing ENTER. See Figure 2 for an 
example of this. 

Pressing CLEAR while a Hashing note is 
displayed on the screen erases orclears that 
note and returns you to the Main menu. 
Note that if you clear the last note in a 
column using the CLEAR key. a rest is printed 
in place of the cleared note since a column 
cannot be empty. The same thing happens 
when you insert a note. 

Sharps and Flats 

Before pressing ENTER, but while the 
note is still blinking on the screen, press FI 
to insert a flat sign in front of the note, 
making that note flat. Similarly, press F2 to 
insert a sharp sign. The down arrow erases 
either a flat or a sharp. 



The measure below, 
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ihihii 



-m 



## 



n±± 



J J *j J .hi. 



Should be entered like this 



Figure 2 



a note or rest and pressed ENTER, after 
which only those extra lines that are needed 
remain on the screen. Press the space bar to 
set the cursor position. Once you are in the 
music entering mode, the cursor position 
cannot be changed. 

As soon as you press the space bar, a 
blinking quarter note is drawn on the screen 
at the cursor position. (See Figure I for note 
lengths.) Using the left and right arrows, 
you can change the length (duration) of this 
note. The left arrow decreases the duration 
of the note and the right arrow increases it. 



To change a note from flat to sharp, you 
do not have to erase the current sign first. 
To change a flat to a sharp, simply press F2 
and vice versa. 

There are a few things you should know 
about how the computer handles sharps and 
flats. The computer cannot distinguish the 
difference between a C sharp or a D flat 
since they are both the same note. There- 
fore, the same number is put in memory for 
both notes and all flats are treated as sharps 
by the computer when the notes are drawn 
on the screen. If. for example, you enter a 
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D-flat.lhe computer automatically changes 
the note to a C-sharp as soon as you press 
ENTER. 

A word of caution: There is no such 
thing as a C-flal. Therefore, should you 
insert a flat in front of a C. the computer 
prints a B on the screen instead. However. 
since a C-flat is indeed a B, the program did 
give you what you asked for. The same 
thing goes for sharps. For example, if you 
enter an E-sharp. the computerchanges it to 
an F. 

Press ENTER for two entire rows of notes 
to be read by the computer. It checks for 
sharps. Hats, and rests as well as records the 
length of the last note entered. These 
numbers, as well as the note length, are 
immediately poked into memory. The en- 
tire row of notes is erased by using a simple 
HGET/HPUT routine. The row of notes is 
redrawn to the screen using the values 
previously poked into memory. While it 
does this, all unnecessary lines that might 
have been drawn by the cursor are erased. 
The program checks the distance between 
adjacent notes and does not print any flags 
on a note if the stem of this note touches the 
bottom of the note printed immediately 
above it. Afterwards, control is returned to 
the main menu and you may reposition the 
cursor for the next note. 



Rests 

As shown in Figure 2, a note and a rest 
cannot be printed or stored in memory in a 
single column. If you have less than four 
notes in a single column, the computer 
automatically adds the rests. Pressing the 
space bar while the cursor is in a column 
containing a rest erases the rest, and a 
blinking note is printed at the cursor posi- 
tion. To enter a rest, press R while a blink- 
ing note is on the screen. This causes all 
notes in that particular column to be erased, 
and a rest is printed in the middle C position 
of that column. The length of the rest may 
be manipulated in the same way you 
changed the length of a note. Also, should 
you press the letter N while a rest is blink- 
ing on the screen, the rest is changed to a 
note of equal length. A rest is always printed 
at the middle C location. 

If you enter more than four notes in a 
single column, the last note entered is erased 
and the program returns to the main menu. 
You do not have to enter the notes one 
column at a time. The computer always 
knows where the cursor is located. You 
may enterthe entire top or bottom row first. 
move the cursor back to the left, and enter 
another row of notes or rests. Also, you can 
jump to any location within the music file 
and make changes and/or additions. 



The Main Menu 

As you may have noticed, the bottom 
part of the screen contains a window in 
which all prompts and error messages are 
printed. It is in this window that you enter 
any additional information the program 
requires. I will go over each menu item and 
give a brief explanation of how it works. 
Every prompt asking you to enter informa- 
tion can be aborted by pressing ENTER, but 
only when the prompt is displayed. When 
more than one entry is required, you may 
abort at each prompt by pressing ENTER. 

Load and Save 

The program loads and saves only with 
disk. The INPUT for the filename does not 
accept more than eight characters, and an 
automatic .BIN extension is given to each 
program. You cannot load a file when 
another file is already in memory. A warn- 
ing buzzer sounds and the input prompt is 
not displayed in the window. 

The same rule applies when you try to 
save a file and there is no file present in 
memory. You do not have to return to 
Column I to save a file. You may do so at 
any time regardless of where the cursor is 
located. 

A tick is heard about once a second 
during all computer operations requiring a 



BOWLING AWARD 



Awards, Certificates, 
Licenses, and Diplomas 

First Prize™ features an extensive collection of 
templates with superbly crafted art and titles. After 
selecting a template, you choose a border, fill in the 
date and signature lines, and type in whatever you 
want to say in the main text area. Many titles can 
also be edited. First Prize 

Includes Nine 
Template Disks, 
Program Disk, 
Labeled Disk- 
Storage Box, 
32 Page User's 
Manual, and 64 
Page Template 
Directory. 
Price $49.95 

Program requires a mouse or joystick, 64K CoCo 

II or 3, disk drive and compatible printer. Printer 

support is mostly similar to our Label Designer, 

but please specify your printer(s) when ordering. 

Ordering Instructions: All orders add $3.00 Shipping & 

Handling. UPS COD (cash only) add $4.00 more. 

VISA/MC Accepted. PA residents add sales tax. 

Zebra Systems, Inc., 121 S. Burrowes Street, 

State College, PA 16801 (814) 237-2652 
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REVOLUTIONARY. 



The MM/1 



A revolutionary computer system 
designed by you. 



MM 



ONE 



Two years ago, the first MM/1 ,M design 
was laid out. Shaped by the latest 
computer technology -- and by your 
needs -- the MM/1 is the most affordable, powerful 
system you can buy . • The MM/1 uses your existing 
RGB-A monitor. It uses your joystick, floppy 
drives, printer, and modem. • Designed around 
industry standards, your future peripherals will fit 
nicely in your MM/1 system. 



MM 



ONE 




And the MM/1 already runs Amiga'" 
graphics utilities, PC animation, 
Macintosh'*' sounds, and follows 
important elements of the Compact Disk- 
Interactive™ standard. IMS offers word- 
processing, databases, and applications brought 
over from the DOS and UNIX worlds. • Smooth 
stereo DMA sound lets the MM/1's 68070 
processor work undisturbed DMA 1.4 Megabyte 
floppy drive. Expandable to five floppies, seven 
hard disk or tape drives, five serial ports. Two 
parallel ports. Joystick port. You can network 128 
MM/1 s together. 

Call 800/866-9084 for brochure or video. 

Interactive 
Media Systems 
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little time (i.e. copying, changing the wave- 
form, etc.). This lets you know the com- 
puter is working. 

Move 

All the numerical input functions, with 
the exception of tempo and waveform, have 
a four-digit limit. (Tempo and waveform 
have a three-digit limit.) Should you try to 
enter too many digits, the computer ignores 
your efforts. The Move function allows 
you to play a section of music without 
playing the whole song. You are prompted 
for a starting and ending column number. 
You can play as little as one column, or the 
entire song. You cannot play the song 
backward, though. If the second column 
number specified is smaller than the first, 
the buzzer sounds and you are prompted to 
try again. 

Jump 

This allows you to jump to another 
memory location. If. for example, you enter 
123, the screen clears and is redrawn with 
the 123rd column appearing first on the 
screen. Error routines do not allow you to 
jump to Column 225 if only 223 columns are 
in memory. The program does not allow 
you to jump to a column number greater 
than 2498. 

Tempo 

The Tempo entry has a three-digit limit, 
which enables you lo go as high as 999. The 
music produced is not of great quality, 
though. The tempo printed on the screen is 
not necessarily the same tempo as you have 
entered. This is due to the truncation that 
occurs when integer values are taken from 
the number entered. Also, any value less 
than 28 produces a tempo of 28 and values 
over 950 produce a value of 950. 

Insert and Delete 

Press I or D while at the main menu to 
insert or delete a row of notes at the cursor 
position. Since inserting a note produces an 
empty column with no music in it, (a no- 
no), a whole rest is printed at the middle C 
position in that column after the insertion is 
completed. If you are going to enter notes in 
that column, ignore the rest — it is erased as 
soon as you press the space bar. 

Clear 

Press C at the Main menu to clear the 
music from memory. A buzzer sounds and 
a warning message is printed in the win- 
dow. Press ENTER to abort the Clear action 
or press SHIFT-CLEAR to proceed. The screen 
is cleared with the HPUT command, which 
clears one column at a time in a FOR NEXT 
loop while the memory is cleared with an 
ML subroutine called by BASIC with a USR 



instruction. It takes less than one second to 
complete the entire operation. 

Copy 

Since C has already been used. Music3+ 
uses the letter K for this function. The Copy 
selection copies any part of the music file to 
any other part, even in the middle of the file. 



000 — 


- Load ML program and draw 




screen 


002 — 


- Check if ML program 




present, if not poke it in 


013 — 


Arrows and cursor 


022 — 


- Score music 


046 — 


- Set and retrieve tempo 


051 — 


Play 


052 — 


Play from cursor 


053 — 


Compute move and cursor 




play start 


058 — 


Load a file 


059 — 


Save a file 


061 — 


Delete 


063 — 


Insert 


064 — 


Draw notes from memory 




values 


074 — 


Jump 


078 — 


Move 


083 — 


Copy 


089 — 


Input numbers subroutine 


094 — 


Input filename subroutine 


102 — 


Convert music file 


104 — 


Draw extra music lines; up 




and down arrows 


106 — 


Draw statements and 




screen-prints 


114 — 


Compute memory displayed 




in window 


115 — 


Compute end of song after 




Load 


122 — 


Compute and print cursor 




note number 


129 — 


Erase screen 


130 — 


Erase window 


132 — 


Break trap 


133 — 


Error trap 


137 — 


Dir 


147 — 


Waveform adjust 


153 — 


Data statements 


Figure 3: The Missing REM 




Statements 



You are prompted for three numbers: the 
start, end, and destination positions. The 
destination position must always be higher 
in memory than the last note to be copied. 
Also, the ending position must be greater 
than the starting position. Copy is aborted if 
the result would create a file that is longer 
than 2498. Remember. Copy is not an Insert! 
If you copy columns l-IO to columns 20-30, 
the original music that was located in the 
destination columns are gone. Alter ihe 



process is finished, the last note copied is 
the first note on your screen. Therefore, if 
you copy something to the end of the file, 
only a single note is printed on your screen. 

Play and Cursor Play 

Press P to play the entire song in mem- 
ory. Press the ALT key. or @. to play your 
song starting at the cursor position. This 
last feature is handy after entering a row of 
notes. 

Waveform 

This allows you to change the wave- 
form, or timbre, of the music being played. 
The new waveform is saved to disk with the 
music file and stays in effect until you 
change it back to normal, or turn your 
computer off and re-run the program. (See 
THE RAINBOW, June 1986, Page 52.) You are 
asked for the five percentage values for the 
fundamental and four harmonics used in 
the waveform. The sum of these five values 
must be too. 

A built-in error trap is included. Five 
input prompts are displayed in the window. 
The default values for the waveform are 50- 
25-25-0-0. which is an organ sound. Note that 
you must enter zeros, even if you enter the 
number 100 for the fundamental only. Press 
ENTER to abort the procedure. 

Non-Menu Items 

Two options are not listed on the main 
menu mainly because the screen was full. 
The first is the space bar. which must be 
pressed to enter music. The second in- 
cludes the numbers 0-3, which set the drive 
number and produce a disk directory. (Both 
of these were mentioned earlier.) 

Left and Right Scrolling 

When the left arrow is pressed while the 
cursor is at the far left side of the screen, and 
not at the start of the file, the notes sort-of 
scroll to the right. We are working in 
HSCREEN 4, and anything drawn to the 
screen must first be erased before some- 
thing else can be drawn in its place. There- 
fore, we use the HPUT loop mentioned ear- 
lier to clear the screen and re-draw the 
screen with all notes shifted 1 2 places to the 
right. The first four notes on the screen 
when you pressed the left arrow are now the 
last four notes on the screen. And since you 
are scrolling left, the cursor is on the fifth 
note counting from the right side of the 
screen. The cursor is on the same note it 
would have been on after pressing the left 
arrow if there had been no need to scroll. 
For example, if the first note on the screen 
was 34 when you pressed the left arrow the 
cursor ends up on note 33, but notes 34, 35, 
36. and 37 still are on the screen to the right 
of the cursor. 
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This was done since the redrawing of 
the screen takes a few seconds and you 
would not want to scroll over every single 
note once the screen is full. Therefore, we 
scroll 12 notes at a time and leave the extra 
four notes on the screen to allow you to get 
your bearings, so to speak. The reverse is 



true when you press the right arrow on the 
far right side of the screen. 

A Final Note 

After this article was written, one slight 
incompatibility with existing A/i«/c+ files 
was found. This program assumes that all 



CoCo 3 Disk 
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You must enter POKE 25 . 14 : P0KE3584 .0:NEW before loading MUSIC3+. 
The Listing: MUSIC3+ 



'MUSIC3+ 

** WRITTEN BY GEORGE QUELHORST 
** COPYRIGHT (C) APRIL 1991 
** BY FALSOFT. INC. 
** RAINBOW MAGAZINE 

1 CLEAR1380 . &H4C8B : RGB : POKE59078 
.141:PALETTE0.56:PALETTE1.32:PAL 
ETTE2.63:PALETTE3.8:HBUFF1.1367: 



HBUFF2.2719:P0KE65497..:P0KE4159 

8.255: 0NBRKG0T0132 : Q-2 : W I DTH80 : C 

LS1:POKE65434.56:ATTR0.0:POKE&HF 

80F.0:POKE&HF84F.0:POKE&HF89C0: 

POKE140.175 

2 0NERRG0T0133:TT-17113:A1-19712 

: A2-20099 : A3-20100 : A4-20257 : A5-2 

0258:A6-19671:A7-19682:A8-20173: 

A9-20128 : DEFUSR0-A3 : DEFUSR1-A6 : D 

EFUSR2-19627 : DEFUSR3-19596 : IFPEE 



music is entered with the highest note in 
Voice I (the soprano position) and the 
lowest note in Voice 4 (bass position). If 
this was not done when the song was en- 
tered using Music+. the flags on the notes 
are not printed correctly to the screen. 
Before a note is drawn on the screen, this 
program checks how much higher on the 
screen the previous note is drawn. If the 
stems of the notes touch each other, it does 
not draw any flags on the note below it. 
This is to make it easier to read the music. 
It is also done in normal music notation. 
When, in such a file, the first note being 
printed is the lowest note in the column, 
there is no note above it for the computer 
to check. Consequently, if the program 
contains a row of '/m notes, four flags are 
drawn on each note, regardless of their 
position on the screen. It is easy to spot this 
condition since the program draws the 
bottom note of a particular row first and 
then the next one up. and so on. However, 
this will not affect the playing or editing of 
that particular song, it only affects the 
screen drawing. 

I sincerely hope that you get as much 
enjoyment out of this program as I did 
while writing it. It was quite a challenge. If 
you have any questions or comments about 
Music3+. feel free to write to me. For a 
response, please enclose an SASE. □ 



COLOR RIBBONS & PAPER 


COLOR RIBBONS 


COLOR PAPER 


RED, BLUE, GREEN, BROWN, PURPLE, YELLOW 






BRIGHT PACK - 
200 Sheets/50 ea. color: 


Ribbons Price Each 


Black 


Color 


Heat 








Transfer 


Red, Blue, Green, Yellow. 
9 1/2 x 11 - $10.90/pk. 


Radio Shack - 








- OMP 107/132/133 


4.50 


6.00 


7.50 


PASTEL PACK - 


- OMP 120/200 


6.25 








- DMP 240 


4.00 


6.00 


7.50 


200 Sheets/50 ea. color- 


- DMP 300/2102 


6.00 


9.00 




Pink, Yellow, Blue, Green 


- DMP 430 


11.00 






9 1/2x11 - $7.90/pk 


- DMP 440 


18.50 








- DMP 442 


500 


7.50 




COLOR BANNER, 


- DMP 500 


• 




PARTY BANNER. 


- DMP 2100/2110 


4.75 6 75 


9.00 


CHRISTMAS BANNER. 


Citizen 180/140 


4.00 


5.00 


7.50 


HAPPY B-DAY BANNER. 


Citizen GSX 140 4-Color 




• 




CONGRATS BANNER - 


Epson FX80/LX800 


3.75 


4,50 


6.75 


45/Roll - $8.95/Ea. Roll 


Okidata 180/192 


5.00 


7.50 






Panasonic 1180/1124 


5.00 


7.50 




COLOR CERTIFICATE 


Seikosha SP800/1000 


4.50 


6.00 


7.50 


PAPER - 


Star NX10/NL10 


5.00 


6.00 


7.95 


100Shts./Pk. - S9.95/Pk 


Star NX 1000 


3.50 


4.50 


6.75 




Star NX 1000 - 4-Color 


6.25 


10.00 






T-SHIRT RIBBONS (Heat Transfer) - Call For Price & Avail. 


COLORS: Red, Blue, Green, Brown, Purple. Yellow, Black 


COLOR DISKETTES 


5 1/4* DS/DD Rainbow Pack. 10/pack - S9.95 


For ribbons & paper not listed above, call for price. Price & spec, subject to change w/o 


notice. Min. order $25.00 S & H $4 50 minimum. Visa, M.C.. COD. 


RAMCO COMPUTER SUPPLIES 


P.O. Box 475, Manteno, IL 60950 U.S.A. 


(U.S.A.! 800-522-6922 • (Canada) 800-621-5444 


815-468-8081 



SELLING FAST. 



The 



MM/1. The revolutionary computer system 
that everybody wants. 



MM 



ONE 



Interactive Media Systems designed the 
MM/1 tor the future -- and for a wide 
range of users. • Industry and higher 
education are buying the MM/1. IBM-PC owners 
are buying the MM/1. Software engineers and 
multimedia developers are buying the MM/1. 

Now you can, too. 



MM 



ONE 




The computer industry, dominated by 
IBM and Apple, is growing at only 8 - 
_ 10% per year. Personal Computing 
magazine reports that multimedia computing will 
more than tripleby 1992. The multimedia MM/1 is 
designed for the future, changing the way you 
think about computing. 

Join us and the rest of the Color Computer com- 
munity. Multimedia computing. Windows. Multi- 
tasking. Familiar operation. High resolution graph- 
ics Stereo sound. 16.7 million color palette. Net- 
working. The MM/1. 

Welcome to your next computer. 



Call 800/866-9084 for brochure or video. 



Interactive 
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K( 20100 )-22ANDPEEK( 20101 )-0ANDPE 
EK( 20102 )-136ANDPEEK( 20103 )-134 
THEN5 

3 L0CATE26.12:PRINT"P0KING ML PR 
OGRAH INTO MEMORY" : F0RT-1T041 : RE 
ADA$:NEXTT:FORO-Al TO A4:READT$: 
POKED. VAL("&H"+T$): NEXT :F0RD-A6 
TO A7:READP$: POKED. VAL("&H"+P$) 

4 NEXT:F0RT-19596T019622:READP$: 
P0KET.VAL("&H"+P$):NEXTT:F0RT=19 
627T019642:READP$:P0KET.VAL("&H" 
+P$):NEXTT:C-USR1(0) 

5 D-PEEK(2394):CLS1:L0CATE33.12: 
PRINT"DRAW1NG SCREEN": POKE59065. 
57:HSCREEN4:POKE59065.32:HCLS0:H 
COLOR1:HPRINT(12.0),"MUSIC+ FOR 
THE COLOR COMPUTER III. BY: GEOR 
GE QUELLHORST":EXEC43350:M-A5:ME 
-A5 : LM-A5 : A-3 : Pl-65496 : P2-65497 : 
GOSUB106 

6 H-0:V-52:HCOLOR2:FORT=1TO5:V-V 
+8:GOSUB113:NEXTT:V-100:FORT-1TO 
5:V-V+8:GOSUB113:NEXTT:HLINE(0.6 
0)-(0.140).PSET:HLINE(640.60)-(6 
40.140).PSET:HCOLOR3:HDRAW"BM15. 
95"+TCS : HDRAWBM7 . 138"+BC$ : HCOLO 
R3:HPRINT(0. 20). "Tempo :":HGET(40 
,8)-(72.159).l 

7 HGET(0.40)-(640.56).2:HLINE(86 
,160)-(86.169).PSET:HLINE(239.16 
0)-(239.169).PSET:HLINE(376.160) 
-(376.169).PSET:HLINE(510.160)-( 
510.169).PSET:HPRINT(48.20)."Crs 
r Note:":HCOLORl:HPRINT(59.20).C 
N$:HCOLOR3:HPRINT(65.20)."Last N 
ote: 0001" 

8 GOSUB50:HPRINT(12. 20). "Cursor 
mem: 20258" :HPRINT(31 .20) ."High 
Mem:":HLINE(0.169)-(640.169).PSE 
T:HCOLOR1:HPRINT(0.19).P1$:X=55: 
PX-90:Y-104:PY-108:HDRAW"BM55.10 
4"+D$:GOSUB130:GOSUB110:HCOLORl: 
HPRINT(0,19)."Drv.":HPRINT(3.19) 
.STRJ(D) 

9 POKE59108.230:HSCREEN4:POKE654 
34.56:POKE59108.231:IFPEEK(A5)>0 
THENGOSUB114:GOSUB64:X-55:Y-104: 
G0SUB115 

10 P$-INKEY$:IFP$-"0"ORP$-"1"ORP 
$-"2"ORP$-"3"THEN137ELSEll 

11 P-INSTR(l."gIPCLTSMDK@JW "+CH 
Rt(4).P$) 

12 IFP$-""THEN13ELSE0N P GOTO 11 
2.61.51.54.58.46.59.78.61.83.52. 
74.146.22.102 

13 IFPEEK(343)-247THENPX-X:PY-Y: 
X-X-35:ME=M:M-M-5:G0SUB118:IFX-2 
0THENRB-1 ELSE19 

14 IFME-20258ANDRB-1 THENGOSUB10 
1:M-A5:X-55:PY-90:RB-0:GOTO10ELS 
EIFRB-1 THEN99 

15 IFPEEK(344)-247ANDPEEK(M)>0 T 
HENPX-X : PY-Y : X-X+35 : ME-M : M-M+5 : G 
0SUB118: 1FX-650THENRA-1ELSE19 

16 IFRA-1 ANDM<32753 THENGOSUB11 
4 : RA-0 : X-55 : G0SUB129: SM-SM+65 : EM 
-SM+80:X-55:GOSUB64:X-195:GOSUB1 
18 

17 IFPEEK(341)-247THENGOSUB104:P 
X=X:PY-Y:Y-Y-4:IFY-28 THENY-32:P 
Y-36ELSE19 

18 IFPEEK(342)-247THENGOSUB104:P 
X-X : PY-Y : Y-Y+4 : I FY-164THENY-1 60 : 
PY-156 

19 lFHP0INT(X+5.Y-4)-3 THENHCOLO 
R2:G0SUB41:HDRAWD$ ELSEHCOLOR1 :G 
0SUB41:HDRAWD$ 



20 IFHP0INT(PX+5.PY-4)-3 THENHCO 
L0R3 : HDRAW"BM"+STR$( PX )+" . "+STR$ 
( PY )+D$ ELSEHCOLOR0 : HDRAW"BM"+ST 
R$(PX)+"."+STR$(PY)+DS 

21 GOTO10 

22 P$-INKEY$ 

23 IFPJ-"R"THENQ-1:G0SUB131 

24 IFQ-1THENY-104:HCOLOR0:GOSUB4 
1:HDRAWR$(7):HC0L0R3:G0SUB41:HDR 
AWR$(A) 

25 IFP$-"N"THENHCOLOR0:HDRAW"BM" 
+STR$(X)+".104"+R$(7):O-2 

26 IFP$=CHR$(13)THEN35 

27 IFPEEK(343)-247THENA-A+1:IFA- 
8THENA-1 

28 IFPEEK(344)-247THENA-A-1:IFA- 
0THENA-7 

29 IFQ-2ANDHPOINT(X-3.101)-3 THE 
NHCOLOR0:HDRAW"BM"+STR$(X)+".104 
"+R$(7) ELSEIFQ-2THENG0SUB42:HC0 
L0R3:G0SUB41:HDRAWN$(A) 

30 1FQ-2ANDPEEK(343)-191 THENGOS 
UB43:HC0L0R3:GOSUB41:HDRAWF$ 

31 IFQ-2ANDPEEK(344)=191 THENGOS 
UB43:HC0L0R3:G0SUB41:HDRAWS$ 

32 IFG-2ANDPEEK(342)-247 THENGOS 
UB43 

33 IFP$-CHR$(12)ANDQ-2 THENGOSUB 
42 : G0SUB43 :T-Y : G0SUB45 :GOT035 

34 G0T022 

35 W-0:FORT-32TO160STEP4:IFHPOIN 
T(X-2.T-4)-3 THENW=W+1:N(W)-T 

36 IFW-5 THENHCOLOR0:EXEC:GOSUB4 
2:G0SUB43:T-Y:G0SUB45:G0T035 

37 NEXTT:TI-INT(128/2*(A-l)+.5): 
POKEM.TI:FORS-1TO4:IFN(S)-0THENP 
O(S)-0:GOTO39 ELSEP( S)-N(S)/4-8: 
P0(S)-VAL(MID$(N0$.P(S)*4+1.3)) 

38 IFHPOINT(X-5.N(S)-3)-3 THENPO 
(S)-PO(S)+2ELSEIFHPOINT(X-6.N(S) 
-5)-3 THENPO(S)-PO(S)-2:T-N(S):H 
COLOR0:GOSUB44:HDRAWN$(A):GOSUB4 
4:HDRAWFJ:G0SUB45 

39 POKEM+S.PO(S):N(S)-0:NEXTS:SM 
-M:EM-M:G0SUB131:X1-X:G0SUB64:X- 
XI 

40 0-2: EXEC :GOTO10 

41 HDRAW"BM"+STR$(X)+"."+STR$(Y) 
: RETURN 

42 HCOLOR0:GOSUB41:HDRAWN$(7):RE 
TURN 

43 HCOLOR0:GOSUB41:HDRAWF$:GOSUB 
41:HDRAWSS:RETURN 

44 HDRAW"BM"+STRS(X)+"."+STR$(T) 
: RETURN 

45 HC0L0R2:IFHPOINT(X-8.T-4)-2 T 
HENHLINE(X-3.T-4)-(X+15.T-4).PSE 
T:RETURNELSERETURN 

46 EXEC:H-7:V-20:HPUT(54.159)-(8 
2. 167). 2. PRESET 

47 GOSUB89:H-6:TE-LO:IFTE-0THENT 
E-l 

48 TE-INT(TT/TE):IFTE<18THENTE-1 
8ELSEIFTE>600THENTE-600 

49 T1-INT(TE/256):T2-TE-256*T1:P 
0KEA8 . Tl : P0KEA8+1 . T2 : LO $-"" : HPUT 
(54.159)-(82.167).2.PSET:GOSUB50 
:GOTO10 

50 HC0L0R3:T9-256*PEEK(A8)+PEEK( 
A8+1):T9-INT(TT/T9):HPRINT(6.20) 
.T9: RETURN 

51 POKEA9.0:POKEA9+I.128:C-USR(0 
):GOTO10 

52 ZT-INT((M-A5)/5)+l:G0SUB53:C- 
USR0(0):GOTO10 

53 ZT-128+5*(ZT-l):ZU-INT(2T/409 
6):ZV-ZT-4096*ZU:ZW-INT(ZV/256): 



ZL-ZV-256*ZW:ZU-16*ZU+ZW:P0KEA9. 
ZU:P0KEA9+1.ZL:RETURN 

54 GOSUB101:GOSUB130:GOSUB125 • 

55 P$-INKEY$:IFP$-""THEN55ELSEEX 
EC 

56 IFP$-CHR$(13)THENGOSUB130:GOS 
UB110:GOTO10 

57 IFP$-"\"THENX-55:G0SUB129:C-U 
SR1(0):HCOLOR0:X-55:Y-104:M-A5:L 
M-A5:DE-A5:GOSUB130:GOSUB110:GOS 
UB118:GOTO10ELSE55 

58 IFPEEK(A5)<>0 THENGOSUB101 :G0 
TO10 ELSEGOSUB130:GOSUB126:H-40: 
V-32 : G0SUB94 : P0KEP1 . . : LOADMLO* : L 
O$-"":POKE&HFF40.0:POKEP2..:GOSU 
B130:GOSUB110:HPUT(54.159)-(82.1 
67).2.PSET:GOSUB50:GOSUB114:X-55 
: G0SUB64 : M-A5 : G0SUB1 1 5 : X-55 : Y-10 
4:GOTO10 

59 IFPEEK(A5)-0THENGOSUB101:GOTO 
10ELSEGOSUB130:GOSUB126:H-40:V-3 
2:L0$-"":G0SUB94 

60 F0RQ1-LM+5 TO LM+10: P0KEQ1 .0: 
NEXT01 : POKEA9.0 : P0KEA9+1 . 128: POK 
EP1 . . : VERIFYON : SAVEMLOS . Al ,Q1 .A3 
:POKE&HFF40.0:LO$-"":GOSUB130:GO 
SUB110:POKEP2..:GOTO10 

61 EXEC:X1-X:SM-M:K-M:LC-(INT(X- 
55)/35)+2:LC-(17-LC):EM-K+(LC*5) 
+9:G0SUB129:IFP-2 THEN63 

62 Dl-INT((LM+4)/256):D2-(LM+4)- 
(D1*256):P0KE&H4CBD.D1:P0KE&H4CB 
E . D2 : C-USR2 ( M ) : X-X 1 : EM-EM-4 : GOSU 
B64 : X-Xl : Y-104 : M-K : LM-LM- 5 : GOSUB 
118:GOTO10 

63 HC0L0R1:LM-LM+5:IFLM>32753THE 
N10ELSE D1-INT(M/256):D2-M-(D1*2 
56 ) : P0KE&H4CA8 . Dl : P0KE&H4CA9 . D2 : 
C-USR3( LM):G0SUB64:X=X1 : Y-104 :M- 
K:GOSUB118:GOTO10 

64 HCOLOR3:Y1-Y:NS-0:W-0:FORT=SM 
TO EM STEP5:NL-PEEK(T):IFNL-0 T 

HENRETURNELSEIFNL-1 THENNL-2:P0K 
ET.2 

65 A-INT(8-(L0G(NL)/L0G(2))):F0R 
S-1T04 : NO=PEEK( T+S ) : I FNO-0THENW- 
W+1:G0T072 

66 N$-RIGHT$(STR$(NO).LEN(STR$(N 
O))-1):N$-STRING$(3-LEN(N$)."0") 
+N$:Y-INSTR(l.NO$.N$):IFY-0 THEN 
N0-N0-2:NS-1:G0T066ELSEY-(((Y-1) 
/4)+8)*4:IFY<>0 THENR-R+1 :Y(R)-Y 

67 HC0L0R2:IFQQ-1 THEN69ELSEIFY> 
-32ANDY<-56 THENIFINT( Y/8)-Y/8 T 
HENG-Y-4ELSEG-Y 

68 IFG>0 THENFORI-G TO 56STEP8:H 
LINE(X-6.I)-(X+18.I).PSET:NEXTI: 
QO-l:G-0 

69 IFY-1520RY-156 ANDHPOINT( X-2. 
148)<>3 THENHLINE(X-6.148)-(X+18 
.148) .PSET ELSEIFY-160 THENHLINE 
(X-6.156)-(X+18.156).PSET:IFHP0I 
NT(X-2.148)<>3 THENHLINECX-6.148 
)-CX+18. 148). PSET 

70 QQ-0:GQ-0:HCOLOR3:IFY(R)-Y(R- 
1X-20 ANDA>3 ANDY(R-1)<Y(R) THE 
NG0SUB41:HDRAWN$(3) ELSEG0SUB41: 
HDRAWN$(A) 

71 IFNS-1THFNG0SUB41:HDRAWS$:NS- 


72 NEXTS:R-0:IFNL<>0 ANDW-4 THEN 
HDRAW"BM"+STR$(X)+".104"+R$(A) 

73 X-X+35:W-0:NEXTT:Y-Y1:X-X1:RE 
TURN 

74 GOSUB130:GOSUB124:H-44:V-23 

75 GOSUB89:IFLO-<0ORLO>2498ORLO> 
VAL(LN$)THENGOSUB101:HCOLOR3:HPR 
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INT(H.V).LOS:L0$="":G0TO75 

76 X-55:G0SUB129:SM-(L0*5)+A5-5: 
EM-SM+80 : G0SUB64 : X-55 : ME-M : M-SM 

77 GOSUB130:LO$-"":GOSUB110:GOSU 
B118:GOTO10 

78 GOSUB130:GOSUB121:GOSUB128:H= 

34:V-23 

79 GOSUB89:ZT-LO:IFZT-0 THENZT-1 

80 0LS=L0$:L0S-"":H-47:G0SUB89:S 
E-LO 

81 IFZT>SE OR SE>2498THENHC0L0R3 
:GOSUB101:HPRINT(34.V).OL$:HPRIN 
T(47 . V ) . LOS : LO$-"" : OLS-"" : GOT079 
ELSEG0SUB53:SE=(SE*5)+A5:TP-PEEK 
(SE):POKESE.0:C-USR(0):POKESE.TP 

82 GOSUB130 : OLS-"" : LOS-"" : GOSUB1 
10:GOTO10 

83 GOSUB130:GOSUB121 

84 G0SUB123:H-24:V-23:G0SUB89:ST 
-LO : LOS-"" : H-37 : G0SUB89 : EN-LO : 10 
$-"": H-58 : G0SUB89 : DE=LO : L0$-"" 

85 IF EN<ST OR DE<EN THENHC0L0R3 
:HPRINT(23.V).ST:HPRINT(36.V).EN 
:HPRINT(57.V).DE:GOSUB101:GOTO84 

86 ST-A5+(ST*5)-5:EN-A5+(EN*5)-1 
:DE=A5+(DE*5)-5:AM-EN-ST:AM-DE+A 
M+1:IFAM>32762 ORPEEK(DE-5)-0 TH 
ENEN-1:ST-2:G0T085 

87 X-55:Z-0:GOSUB129:FORT-ST TO 
EN:L-PEEK(T):P0KEDE.L:DE-DE+1:G0 
SUB152:NEXT 

88 X-55 :SM-AM- 5: EM-SM+80 :G0SUB64 
:GOSUB130:GOSUB110:M-AM-5:GOSUB1 
18:X-55:GOTO10 

89 PS-INKEYS:IFPS-""THEN89 ELSEI 
FPS-CHR$(8) 0RP$-CHR$(13)THENEXE 



C:GOTO90 ELSEIFASCC P$)<48 ORASC( 
P$)>57THEN89ELSEEXEC 

90 IFL0S-""ANDPS-CHRS(8)THENPS=" 
":G0T089 ELSEI FP$-CHR$(8)THENHC0 
L0R3 : HPRINTC H . V ) . LOS : HC0L0R2 : LOS 
-LEFTS(L0$.LEN(L0$)-1):HPRINT(H. 
V).L0S:G0T089 

91 IFPS-CHRS(13)ANDL0S-""THENG0S 
UB130:GOSUB110:GOTO10 

92 IFPS-CHRS(13)THENL0-VAL(L0S): 
RETURNELSEIF(P-60RP-13)ANDLEN(L0 
$)->3THEN89ELSEIFLEN(L0S)->4THEN 

89 

93 L0S-L0S+PS:HC0LOR2:HPRINT(H.V 
).L0$:G0T089 

94 PS-INKEYS:IFPS-""THEN94ELSEEX 

EC 

95 IFPS-CHRS(8)ANDL0S=""THENPS=" 
":G0T094 ELSEI FPS=CHRS(8)THENHC0 
L0R3:HPRINT(H.V).LOS:L0S-LEFTS(L 
0S.LEN(L0$)-1):HPRINT(H.V).L0S:H 
C0L0R2:HPRINT(H.V).L0S:G0T094 

96 IFPS-CHRS(13)ANDL0S-""THENG0S 
UB130:HCOLOR3:GOSUB110:GOTO10 

97 IFPS-CHRS(13)THENRETURN ELSEI 
FLEN(L0S)->8THEN94 

98 L0$-L0$+PS:HCOLOR2:HPRINT(H.V 
).L0S:G0T094 

99 X-55:Xl-475:G0SUB129:SM-SM-65 
:IFSM<-A5 THENSM-A5:Xl-( (M-A5)/5 
):Xl-(Xl*35)+55 

100 EM-SM+80:X-55:GOSUB64:X-X1:G 
OSUB118:RB-0:GOTO10 

101 FORU-1TO20:EXEC:NEXTU:RETURN 

102 IFPEEKU997U-55 THENGOSUB10 
1:GOTO10 ELSEGOSUB130:RESTORE:PO 



-19967:Z-0:HCOLOR2:HPRINT(30.22) 
."CONVERT MUSIC F I LE" : HPRI NTC 18 , 
23). "PRESS ENTER TO PROCEED / SP 
ACEBAR TO ABORT" :GOSUB101 

103 P$-INKEYS:IFPS-" "THENG0SUB1 
30:GOSUB110:GOTO10 ELSE I FPS-CHRS 
(13)THENF0RT-1T0297:G0SUB152:REA 
DAS : NEXT : F0RT-1T0132: PO-PO+1 :GOS 
UB152:READPS:P0KEP0.VAL("&H"+PS) 
:NEXT:GOSUB130:GOSUB110:GOSUB101 
:TE-INT(T9/2):G0T048 ELSEIFPS-"" 
THEN103 

104 IFY-32 OR Y-40 OR Y-48 ORY-5 
6 ORY-152 ORY=160 THENHC0L0R2 EL 
SERETURN 

105 IFHP0INT(X-2.Y-4)-3 THENHLIN 
E(X-7.Y-4)-(X-4.Y-4).PSET:HLINE( 
X+15.Y-4)-(X+18.Y-4).PSET:XL-0:R 
ETURN ELSEHLINE(X-7.Y-4)-(X+18.Y 
-4).PSET:XL-0:RETURN 

106 NS(1)-"BU2BLR12EU2HL12GD2FBF 
BD":NS(2)-NS(1)+"BUBR13U21BD22BL 
13":N$(3)-N$(2)+"BUBH2R14UL14UR1 
4BD5BL12":NS(4)-NS(3)+"BR13BU22R 
4DBD21BL17":NS(5)-NS(4)+"BR13BU1 
8R4DBD17BL17":N$(6)-NS(5)+"BR13B 
U14R40BD13BL17":NS(7)-NS(6)+"BR1 
3BU10R4DBD9BL17" 

107 TC$-"HL3GR5DL5FR3EU32E3R4F3D 
3G6L9G8D5F5R16E4U4H4L10G3D3RBD5B 
L4H5BRU4E7BR9BU2E5U3H2BD18RF3D4G 
3" : BCS-"E18BR4R2EUHL2GR4DL4BDBL3 
U6BR3FR2EUHL2GR4DL4BL3H4BDF3D6G4 
BU14BRL13G6DFR2EUHFL4DR4BU2BL2E4 
":D$-"BRBU3R9BU2L9":FS="BL11BUU8 
BD3R5DG4LBDBR11" 



SUPER SUPER SPECIAL Over 250 Quality Pictures 



All 530 Public Domain Programs-$145 Value 
All 1,020 Subscription Programs-$260 Value 
All 250 Graphic Pictures-$70 Value 
ENTIRE PACKAGE Regularly $475 





SEE PAGE 67 FOR DETAILS 
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Each Set Includes 

An Excellent Graphics Editor I 

Pictures are CoCo-MAX II compatible. 

Each Set Of 10 Disks 

Only $35.00 ! 
Buy % Get One Free! 
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67 FOR DETAILS W 



Set#1 


Set #2 


Set #3 


Clipart 


Celebrities 


Adult Only 


Space Pictures 


Cartoon Characters 


R-Rated 


Animals 


Great Graphics 


Beautiful Women 


More 


More 





Subscription Software • 2490 Mies Stands*. Dr., HokncL MI 49423 • 616- 399- 9648 
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108 SS-"BL11BUU6BR4D6BU2BR2L8BU2 
R8BD5BR5" : R$( 1 )="BU2L3UR3U3R11D3 
R3DL14":R$(2)=R$(1)+"BL3D16":R$( 
3)-R$(2)+"BU17R14ULllURll":R$(4) 
-RS(3)+"BL14BD2D17R5":R$(5)-R$(4 
)+"BU4L5":R$(6)=R$(5)+"BU4R5":R$ 
(7)-RS(6)+"BU4L5":CN$="0001":LNS 
-CN$ 

109 NO$-"112.108.106.102.098.096 
.092.088.084.082.078.074.072.068 
. 064 . 060 . 058 . 054 . 050 . 048 . 044 . 040 
.036.034.030.026.024.020.016.012 
.010.006.002":RETURN 

110 HCOLOR2:HPRINT(0.22),"<L>OAD 
<M>OVE <T>EMPO <I>NSER 

T <P>LAY <F1> MENUS <W 

> WAVEFORM" :HPR1NT(0. 23 )."<S>AVE 

<J>UMP <OLEAR <D>ELET 
E <K>OPY <F2> CNVRT <@ 

> CRS. PLAY" : PQ-1 : RETURN 

111 HCOLOR2:HPRINT(0.22)."<N> NO 
TE -> RAISE LENGTH <ENT> 

INSTAL NOTE <F1> FLAT 
DWN. ARROW":HPRINT(0.23)."<R> RE 
ST <- LOWER LENGTH <CLR> 

CLEAR NOTE <F2> SHARP 
CLEAR F+S":PQ-0: RETURN 

112 GOSUB130:IFPQ-1THENGOSUB111: 
GOTO10 ELSEGOSUB110:GOTO10 

113 HLINE(H.V)-(640.V).PSET:RETU 
RN 

114 LC-INT((X-55)/35)+l:SM-M-(LC 
*5)+5:EM-SM+80:IFX-650THENRETURN 
ELSERETURN 

115 PE-PEEK(M) : I FPE-0THEN1 17 

116 M-M+25:GOSUB152:GOT0115 

117 FORT-M TO M-25STEP-5:M-M-5 : I 
FPEEK(M)=-0 THEN117 ELSELM-M:M-A5 
: GOSUB1 18 :GOSUB101: RETURN 

118 HCOLOR3:1FM<20258 THENM-2025 
8 ELSEIFM>LM THENLM-M 

119 HPUT(189.159)-(233.167).2.PS 
ET:HPUT(325.159)-(369,167).2.PSE 
T:HPRINT(23.20).M:HPRINT(40.20). 
LM:HPUT(469.159)-(504.167).2.PSE 
T:HPUT(605.159)-(640.167).2.PSET 

120 CN$-STR$(INT((M-A5)/5)+l):CN 
$-RIGHT$(CN$.LEN(CN$)-l):CN$-STR 
ING$(4-LEN(CN$)."0")+CN$:HCOLOR1 
:HPRINT(59.20).CN$:LN$-STR$(INT( 
(LM-A5)/5)+l):LN$-RIGHT$(LN$.LEN 
(LN$)-1):LN$=STRING$(4-LEN(LN$). 
"0")+LN$:HCOLOR3:HPRINT(76.20).L 
N$:RETURN 

121 HC0L0R2:IFP-8THENHPRINT(16.2 
2). "PLAY"ELSE I FP-10THENHPRINT( 16 
.22). "COPY" 

122 HPRINT(21. 22). "BLOCK OF MUSI 
C / PRESS ENTER ONLY TO ABORT" :R 
ETURN 

123 HCOLOR2:HPRINT(17.23)."Start 
:":HPRINT(32.23)."End:":HPRINT(4 
5.23)."Destination:":RETURN 

124 HC0L0R2:HPRINT(16.22)."JUMP 
TO SPECIFIC COLUMN / PRESS ENTER 

TO ABORT" :HPRINT( 29. 23). "Column 
number:":RETURN 

125 HCOLOR2:HPRINT(30. 22). "CLEAR 
MUSIC MEMORY" :HPRINT( 20. 23 )."SH 

IFT-CLEAR TO PROCEED / ENTER TO 
ABORT": RETURN 

126 HC0L0R2:IFP-5 THENHPRINT(21. 
22). "LOAD" ELSEHPRINT<21.22)."SA 
VE" 

127 HPRINT(26.22)."A PROGRAM / P 
RESS ENTER TO ABORT" :HPRINT(30.2 
3). "FILENAME: ":RETURN 



128 HC0L0R2:HPRINT(27.23)."Start 
:":HPRINT( 42.23). "End :":RETURN 

129 FORT-X T0615STEP35:H-T-14:V- 
T+18:HPUT(H.8)-(V.159).1.PSET:NE 
XTT: RETURN 

130 EXEC43350:HPUT(0.175)-(640.1 
92).2.PRESET:RETURN 

131 HPUT(X-14.8)-(X+18.159).1.PS 
ET: RETURN 

132 POKE41598.3:CLS1:ATTR0.0:STO 
P 

133 POKEP2. . :RESTORE:LO$-"":GOSU 
B101:FORT-0TO ERNO:READER$ :NEXT: 
POKE59078.51:HSCREEN4:POKE65434. 
56:HC0L0R1:HPRINT(3.19).PEEK(239 
4) 

134 GOSUB130:HCOLOR2:HPRINT(16.2 
2). "YOU HAVE ENCOUNTERED A":HPRI 
NT(39.22).ER$:HPRINT(42.22)."ERR 
OR IN LINE NUMBER":HPRINT(62.22) 
.ERLIN:HPRINT(19. 23). "PRESS BAR 
TO RETRY / ENTER TO BREAK PROGRA 
M":POKE59078.141 

135 P$-INKEY$:IFP$-""THEN135 

136 IFP$-CHR$(32)THENGOSUB130:GO 
SUB110:GOTO10 ELSEIFP$-CHR$( 13)T 
HEN132 ELSE135 

137 HCOLOR0:HPRINT(3.19).STR$(D) 
:POKE59078.51:HSCREEN0:WIDTH80:D 
-VAL(P$):DRIVED:LOCATE20.0: PRINT 
"DIRECTORY OF DRIVE" :0;"/" ;FREE( 
D):"FREE GRANULES" :H-0:V-3 

138 FORI-3T011 :DSKI$D. 17. I .A1J.A 
2$:FORJ-1T08:IFJ<5 THENK-( J- 1 )*3 
2ELSEK-(J-5)*32 

139 IFJ-5THENA1J-A2S 

140 A3$=MID$(Al$.K+1.8)+"/"+MID$ 
(Al$.K+9.3) 

141 IFASC(LEFT$<A3$.1))-255THEN1 
44ELSEIFASC(LEFT$(A3$.1))-0THEN1 
43 

142 L0CATEH,V:PRINTA3$::H-H+17:I 
FH>68THENH-0:V=V+1 

143 NEXTJ.I 

144 LOCATE30.21 :PRINT"— PRESS A 
NY KEY — " 

145 IFlNKEY$O""THENHSCREEN4:P0K 
E65434.56:HC0L0R1:HPRINT(3.19).P 
EEK(2394):POKE59078.141:GOTO10EL 
SE145 

146 GOSUB130:HCOLOR2:HPRINT(6.22 
). "Fundamental . . . . : First 

Harmonic: Second Harmon 

1c:":HPRINT(6.23)."Third Harmon 
ic: Fourth Harmonic:" 

147 H-23:V-22:GOSUB89:Z-0:LC(0)- 
L0:L0$-"":H-47:G0SUB89:LC(1)-L0: 
LO$-"" : H-71 : G0SUB89 : LC( 2 )-LO : LO$ 
-"":H-23:V-23:GOSUB89:LC(3)-L0:L 
0$-"" : H-47 : G0SUB89 : LC ( 4 )-L0 

148 L0$-"" : LC-0 : FORT-0TO4 : LC-LC+ 
LC(T):NEXT:IFLC<>100 THENGOSUB10 
1:GOSUB130:HPRINT(17.23)."SUM OF 

PERCENTAGES MUST BE 100 / PRESS 
ANY KEY" ELSEGOSUB130:GOTO150 

149 IFINKEY$O""THENGOSUB130:GOT 
0146ELSE149 

150 HPRINTC21. 23). "CALCULATING N 
EW WAVEFORM - PLEASE WAIT": : FOP.I 
-0TO4:LC(1)-LC(I)/100:NEXT:FORI- 
0TO255:AR-2*3. 14159*1 /256:SC-LC( 
0)*SIN(AR)+LC(1)*S1N(2*AR)+LC(2) 
*SIN(3*AR)+LC(3)*SIN(4*AR)+LC(4) 
*SIN(5*AR):SC-32+INT(31*SC+.5):P 
0KEA1+I.SC 

151 GOSUB152:NEXT:GOSUB130:GOSUB 
101:GOSUB110:GOTO10 



152 Z-Z+l:IFINT(Z/25)-Z/25THENEX 

ec:returnelsereturn 

153 data nf.sn.rg.od.fc.ov.om.ul 

.bs.dd./0.id.tm.os.ls.st.cn.fd.a 
o.dn.io.fm.no.ie.ds.uf.ne.br.df. 
ob.wp.fn.fs.ae.fo.se.vf.er.ds.hr 

.HP 

154 DATA D.E.F.11.12.14.15.16.18 
. 19. IB. IC. ID. IF. 20. 22. 23. 26. 27. 2 
9.2A.2B.2D.2E.30 

155 DATA 31.32.34.35.37.38.38.39 
.3B.3B.3C.3C.3E.3E.3E.3F.3F.3F.3 
F.3F.3F.3F.3E.3E 

156 DATA 3E.3C.3C.3B.3B.39.38.37 
.37.35.34.32.31.30.2E.2E.2D.2B.2 
A. 29. 27. 26. 24. 23 

157 DATA 22. 20. IF. IF. ID. IC. IB. IB 
.19.19.18.18.16.16.15.15.15.15.1 
5.15.15.15.15.15 

158 DATA 15.15.15.16.16.16.18.18 
.18.19.19.1A.1A.1B.1B.1B.1C.1C.1 
E, IF. IF. 20. 20. 22 

159 DATA 22.22.22.22.23.23.23.23 
.23.23.23.22.22.22.22.20.20.20.1 
F.1F.1D.1D.1C1C 

160 DATA IB. 19. 19. 18. 16. 15. 15. 14 
.12.12.11.F.E.E.D.B.B.A.8.8.7.7. 
6.6.4.4.3.3.3.1 

161 DATA 1.1.1.1.1,0.0.0.0,0.1.1 
.1.1.1.1.1.3.3.3.3.3.4.4.4.4.4.6 
.6.6.6.6.6.6.6.7 

162 DATA 7.7.7.7.7.7.6.6.6.6.6.6 
.6.6.6.4.4.4,4.4.4.4.4.4.4.3.3.3 
.4.4.4.4.4.4.6.6 

163 DATA 6. 7. 7. 7. 8. A. A. B.D. 0.0.1 
. 37. 1. 4A.1.5E. 1.72.1. 88. 1.A0.1.B 
9.1.D3.1.EE.2.0C 

164 DATA 2.2B.2.4C.2.6F.2.94.2.B 
B.2.E4.3.10.3.3F.3.71.3.A5.3.DC. 
4.17.4.56.4.98.4 

165 DATA DD.5.28.5.76.5.C9.6.21. 
6.7F.6.E2.7.4A.7.B9.8.2F.8.AC.9. 
30. 9. BB. A. 50. A 

166 DATA ED.B.93.C.43.C.FE.D.C4. 
E. 95. F. 73.10.5F.il. 58. 12. 60. 13. 7 
7. 14. A0. 15. DA. 17 

167 DATA 26. 18.87. 19. FC. IB. 88. ID 
.2B.1E.E7.20.BE.22.B0.24.C0.26.E 
F.29.40.2B.B4.2E 

168 DATA 4D.31.0E.16.0.88.86.4C. 
1F.8B.86.3F.B7.FF.23.1A.50.30.8D 
.FE.6A.9F.C3.9F 

169 DATA C6.9F.C9.9F.CC. 30. 8D.0. 
80.9F.C0.39.9E.C0.A6.80.97.C2.39 
.31.8D.FF.50.A6 

170 DATA 80.EE.A6.DF.CF.A6.80.EE 
.A6.DF.D1.A6.80.EE.A6.DF.D3.A6.8 
0.EE.A6.DF.D5.9F 

171 DATA C0.39.10.8E.0.BE.A6.9F. 
4C.C3.AB.9F.4C.C6.A9.9F.4C.C9.A9 
.9F.4C.CC.B7.FF 

172 DATA 20.DC.C4.D3.CF.DD.C4.DC 
.C7.D3.D1.DD.C7.DC.CA.D3.D3.DD.C 
A.DC.CD.D3.D5.DD 

173 DATA CD.31.A2.26.6.A.C2.27.C 
.20.C7.A6.80.20.0.20.0.20.0.20.C 
1.39.17.FF.75.8D 

174 DATA 91. 81. 0.26. 4. 4F. IF. 8B. 3 
9.8D.8E.8D.AB.20.F0.8E.4F.22.4F. 
A7.80.8C.7F.F1 

175 DATA 26.F9.39.BD.B3.ED.1F.02 
.A6.A2.A7.25.10.BC.4C.A8.26.F6.C 
E. 00. 00. 86. 80 

176 DATA A7.A0.EF.A1.EF.A4.39.BD 
.B3.ED.1F.02.A6.25.A7.A0.10.BC.4 
C.BD.26.F6.39 
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In your face 
Graphics! 




Show 'em where you stand with your own 
customized T-shirts, sweat shirts, underwear, caps, jackets... 

just about anything! 



New MAXWEAR patented process 
allows transfer of anything you 
print. Create your own artwork 
with CoCo Max (or any other 
graphics program)...print it with 
any dot matrix printer... add colors 
with crayons or markers...transfer 
on item with an iron. 

Call 1800-2210916 
1-203-656-1806 



Special introductory offer 

...enough for eight T-shirts, etc... 

Only $19.95! 

A portion from each order to be 
donated to the US. 
Marine Corps 
Scholarship Fund. 



[COLORWARE 



242 West Ave. 
Darien,CT 06820 




How to order: Use Visa, Mastenard or M.O. C.O.D. add $4.00 extra. Purchase Orders subject to credit approval. Connecticut residents add 8% sales lav 
Shipping $4.00 per order, usually IPS ground. UPS 2nd day air $4.00 extra. Next day service available. Canada: S6.00 per order (Airmail ). 

Outside U.S. & Canada add 10% of order total. 



* 



Bet a little, bet a lot 





Easy Come, Easy Go was in- 
spired by Card Guppies, a 
game I found on a local 
BBS. Everyone who 
called loved the game, 
but it was run on a Tandy 1(100. I 
thought the CoCo Community would 
enjoy this kind of game. It works 
similar to the bonus round on the 
game show Card Sharks. While writing 
Easy Come, Easy Go. I got a lot of ideas 
from a Solitaire game that appeared in THE 
RAINBOW. 

After you enter the listing, save it by 
entering SAVE"EASYGO . BAS : 0" (fordisk)or 
CSAVE"EASYGO.BAS" (for tape). When you 
run the game, you are asked whether or not 
you want it to use the high-speed poke. You 
are also asked whether or not you want to 
see the instructions. After you make these 
choices, a message appears at the top of the 
screen telling you the cards are being se- 
lected. This takes more time than anything 
else in this program, but be patient. After 
this, just press ENTER to start the game. 

Rules of Play 

Easy Come, Easy Go is easy to play (no 
pun intended). You see 12 playing cards 



James Bush, an electronics technician, has 
had a CoCo system for about five years and 
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working on high-performance cars. He can 
be contacted at 1545 Ferris Rd.. Apt. C-3, 
Columbus, OH 43224. 
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drawn on the screen along with three 
"change" cards. The 12 playing cards are 
arranged into three rows with six cards on 
the bottom row. four cards in the middle, 
and two cards on top. A change card ap- 
pears to the left of each row. The change 
card can replace your current card on the 
playing board, should you choose to do so. 
Under the playing board you see the op- 
tions: C for Change Card and P for Place 
Bet. Printed under these options is the 
amount of money you have in your account . 
You always start with S20, and your objec- 
tive is to break the bank. I set the bank limit 
at $50,000,000 because of BASIC. Fifty mil- 
lion is eight digits long. If you work with 
numbers larger than that on the CoCo. you 
end up with lots of scientific notation. 
Because of the string manipulations and 



drawing used, scientific notation is out. The 

game won't stop until you go over 

S50.000.000 SO, if you get up to S49.999.999 

and double it on a bet. you can score as 

much as S99.999.998 when you break 

the bank. 

When you first start the game, all 
the cards are face down, except the 
first card on the bottom row. You bet 
on whether you think the next card is 
higher or lower than the card being 
shown. For example, if a 7 is showing, you 
bet on whether the next card is higher or 
lower. In this case, the odds are 50 percent 
that the next card is higher and 50 percent 
that the next card is lower. This would be a 
perfect lime for the Change Card option. 
When you press C. the card to the left of the 
row you're working on is turned face up, 
and it replaces the current card. Following 
our example, the 7 would be changed to 
another card, say a 2. Use this change op- 
tion wisely and sparingly — you have only 
one Change Card per row. 

Since a 2 is snowing, you would bet 
everything that the next card is higher since 
nothing is lower than 2. (The same goes for 
the Ace — nothing is higher than the Ace.) 
Press P to Place your bet. and type in the 
amount of the bet. At this point, an up arrow 
and a down arrow are drawn on the screen. 
If your guess is that the next card is higher, 
press the up-arrow key. Otherwise press the 
down-arrow key. Win or lose, the amount 
of the bet is added or subtracted from your 
account accordingly. 

If you enter the wrong amount for a bet, 
press the left arrow and the screen will be 



20 



THE RAINBOW April 1991 



redrawn. Then you can re-enier your bet. If 
you bet more than you have in your account 
(this is known as cheating), the bet is not 
acknowledged by the computer. One last 
thing about placing bets: If you are on the 
top row with only two cards, the first is 
turned up and the second is turned down, it 
is the final bet of the game. Since it is sort 
of like the grand finale, you must bet at least 
half of your account or the CoCo won*t 
acknowledge your bet. 

If you bet everything and lose, you arc 
bankrupt and the game is over. You have 
the option of quitting or starting a new 
game. 

If you draw a Joker, you are forced into 
bankruptcy and have the same options of 
Starting a new game or quitting. If you 
break the bank you are rewarded with a nice 
song and celebration. 

About the Program 

Writing Easy Come. Easy Go was just 
like making the rules for a card game. 
(There are so many IF/THEN statements. I 
don't care if I ever see one again ! ) The first 
thing the program does is select the cards. 
This is done by arranging an array with S3 
elements (52 cards, plus a Joker). As a 
novice programmer. I made what I think is 
an astonishing discovery. I originally used 
the RND statement to select the cards from 
the array. This worked fine until I loaded 
the program a few times and discovered 
that I was coming up with the same cards in 
every game. I later found that this is be- 
cause of the CoCo*s internal timer. I put in 
a lot of commands to thro w the timer out of 
whack and finally succeeded in getting a 
good approximation of random choices. 

After the computer selects a given card 
for a game, the card is marked so it cannot 
be chosen again. The computer then checks 
to see what card you are on and is ready to 
draw the screen using many DRAW state- 
ments. The options are drawn using vari- 
ables defined near the beginning of the 
program. You can place a bet or change the 
card. The cards are compared to see if you 
guessed right. Program operation is broken 
down into simple sections and highlighted 
with REM lines in the listing. 

Ending the Game 

When you want to quit, do so at one of 
the menus showing the Quit option. The 
game operates in the high-speed mode on 
the CoCo 1 and 2. and normal operation is 



resumed when you select Quit. CoCo 3 
users should change POKE 65495 . to POKE 
65497 . in Line 20 and POKE 65494 . to 
POKE 65496.0 in lines 25 and 1025. You can 
exit the game by pressing BREAK at any 
time, but remember to enter POKE 65494 . 
(or POKE 65496.0) before doing any disk or 
tape I/O. 



If you want to play a more challenging 
game, delete Line 830 and you '11 run into the 
Joker more often. If you want your game to 
be easier, change the RND( 3 )s in Line 920 to 
something like RND(20) and you might never 
draw a Joker. 
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25 169 

85 162 

125 15 

150 67 

165 119 

185 39 

215 183 

245 247 

275 176 

310 121 



360 176 

425 93 

460 154 

510 159 

555 132 

590 205 

620 176 

640 230 

685 67 

725 48 



770 .....143 

835 201 

875 223 

930 73 

975 45 

1015 .....51 

1055 81 

1085 246 

1135 47 

1170 ........182 



1185 .191 

1215 81 

1245 108 

1275 63 

1305 195 

1335..... 81 

1365 110 

1395 127 

END 174 



The Listing: EASYG0 

1 'EASY COME EASY GO 

2 'WRITTEN BY JAMES BUSH 

3 'COPYRIGHT (C) APRIL 1991 

4 'BY FALS0FT. INC. 

5 'RAINBOW MAGAZINE 

10 CLS:PRINT" easy come / e 

asy go":PRINT:PRINT:PRINT"A GAME 
OF WINNING AND LOSING. (WHAT 
ELSE DO YOU DO IN GAMES? )": PRINT 
:PRINT:PRINT"HIGH SPEED POKE (Y/ 
N)?" 

15 GS-INKEYS 

20 IFG$-"Y" THEN P0KE65495 ,0:GOT 
35 

25 IFG$-"N" THEN POKE65494.0:GOT 
035 

30 GOTO 15 

35 PRINT@480."DO YOU WANT INSTRU 
CTI0NS (Y/N)?": 
40 G$-INKEY$ 
45 IFG$-"Y" THEN 1180 
50 IFG$-"N" THEN 60 
55 GOTO 40 

60 CLS:CLEAR2000:M-20:JJ-100 
65 0IMN$(15).T$(2).L$(28).F$(8). 
A$(15).B$(15).A(15).D(53).E(8).H 
J(8) 

70 GOSUB150 

75 FORI-lTO15:A(I)-0:NEXTI:S-0 
80 G0SUB 785 

85 PRINT@480. "PRESS <ENTER> TO S 
TART GAME"; 
90 G$-INKEY$ 

95 IFG$=CHR$(13) THEN 105 
100 GOTO 90 
105 G0SUB935 



110 GOTO200 

115 DRAW"BM24.136;XLJ(27);":DRAW 

"BM27.136;XL$(3):":DRAW"BM34.136 

:XL$(28):":DRAW"BM42.136;XL$(8); 

" : DRAWBM49 . 136 : X L$( 1 ) : " : DRAW'BM 

56.136:XL$(14);":DRAW"BM63.136:X 

L$(7);":ORAW"BM70.136:XL$(5):" 

120 DRAWBM84 . 136 : XL *( 3 ) ; " : DRAW" 

BM91.136:XL$(1):":DRAW"BM98.136; 

XLJ(18):":DRAW"BM105.136;XL$(4): 

125 DRAW"BM24.148;XL$(27):":DRAW 

"BM27.148;XLJ(16);":0RAW"BM34.14 

8;XL$(28):":DRAW"BM42.148;XL$(12 

):":DRAW"BM49.148:XL$(1):":DRAW" 

BM56.148:XL$(3):":DRAW"BM63.148; 

XL$(5):" 

130 DRAW"BM77.148;XL$(2):":DRAW" 

BM84.148:XL$(5);":DRAW"BM93.148: 

XL$(20):" 

135 DRAWBM27 . 188 ; XL$( 5 ) : " : DRAW" 

BM34.188;XL$(1):":DRAW"BM41.188: 

XL$(19);":DRAW"BM49.188:XLJ(25); 

" : DRAWBM63 . 188 ; XL$( 3 ) : " : DRAW'BM 

70.188;XL$(15);":DRAW"BM77.188:X 

L$(13):":DRAW"BM84.188:XL$(5):" 

140 DRAWBM98 . 188: XLS ( 5 ) : " : DRAW" 

BM105.188:XL$(1):":DRAW"BM112.18 

8:XL$(19):":DRAW"BM120.188:XLJ(2 

5):":DRAW"BM134.188:XL$(7):":DRA 

W"BM141.188:XLS(15):" 

145 GOTO305 

150 N$(0)-"BUU4ER2FD4GL2H":N$(1) 

-"U4E2F2D2L3R302":N$(2)-"BU5ER2F 

DGL2GD2R4":N$(3)-"BR3L2HBU4ER2FD 

GLRFDG":N$(4)-"BR3U6G3DR4":N$(5) 
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="BR3L2HBU5R4L4D2R3FD2G":N$(6)-" 

BR3L2HU4ER2FBD2BL3R2FDG" 

155 N$(7)-"BU6R4DG3D2":N$(8)-"BR 

3L2HUEHUER2FDGL2R2FDG":N$(9)-"BU 

FR2EU2L3HUER2FD4":N$(10)="R2LU5L 

RUBR5R2FD4GL2HU4E":NJ(11)="UDR3U 

6L2R4":N$(12)="BR1HU4ER2FD4GLBUF 

2":N$(13)-"U6BR4G3F3":NS(14)-"R2 

LU6DLRBRBD5" 

160 N$(15)-"U2E1U2E1F1D2F1D2L4R5 

E5R1F2L1H1D1G1D1G1L8D3F1D2F1R2E1 

U2E1U3" 

165 T$(1)-"R20F2D30R1U30D30G2E2L 

1G2L20D1R20U1L20H2U30E2" 

170 T$(2)-"R20F2D30R1U30D30G2E2L 

1G2L20D1R20U1L21H2U30E2D34R2U34R 

2D34R2U34R2034R2U34R2034R2U34R2D 

34R2U34R2D34E2U30" 

175 L$(1)-"U4E2F2D2L3R3D2":L$(2) 

- M U6R3F1D1G1L3R3F1D1G1L3":L$(3)- 

"R3E1G1L3U6R3F1":L$(4)-"R2E2G2L2 

U6R2F202":L$(5)-"R4L4U3R3L3U3R4" 

:L$(6)-"U3R3L3U3R4":L$(7)-"R3E1U 

1L1R1D1G1L3U6R3F1":LS(8)-"U6D3R4 

U3D6":L$(9)-"R4L2U6R2L4":L$(10)- 

"U1D1R3U6R2L5" 

180 L$(11)-"U6D3E3G3F3":L$(12)-" 

R4L4U6":L$(13)-"U6F2E2D6":L$<14) 

-••U6D1F4D1U6":L$(15)-"U6R4D6L4": 

LS(16)-"U6R3F1D1G1L3":L$(17)-"R2 

E1H1F2H1U4H1L2G1D4F1":L$(18)="U6 

R3F1D1G1L3F3": L$(19)-"R3E1U1H1L2 

H1U1E1R2" 

185 L$(20)-"U6R2L4":L$(21)-"U6D6 

R4U6":LS(22)-"H2U4D4F2E2U4":L$(2 

3)-"U6D6E2F2U6":L$(24)-"UlE2F2Dl 

U1H4U1D1F2E2U1":L$(25)-"U3E2U1D1 

G2H2U1":L$(26)-"R4L4U1E4U1L4":L$ 

(27)-"H3E3":L$(28)-"E3H3" 

190 AA$-"T403L8DP32DP32DL4.GL4.B 

L8DP32DP32DL4.GL2.BP32":AB$-"L4G 

P32L8GF#P32F#P32EP32EL2.DP32":AC 

$-"L8DP32DP32DL4 . F#L4AP32L8DP32D 

P32DL4.F#L2.AP32":AD$-"04L4DL8EP 

32DP32CP3203BAL2G" 

195 RETURN 

200 PMODE4.1:COLOR0.1:PCLS(1):SC 

REEN1.1 

205 IF A(13)-0 THEN DRAWBM4 .0;X 

T$(2);" ELSE DRAWBM2 ,0: XT$( 1 ) ;" 

:DRAW"BM7.20:XA$(13):" 

210 IF AUD-0 THEN DRAWBM126.0 

;XT$(2):" ELSE DRAWBM125.0: XTJ( 

1):":DRAW"BM130.20:XA$(11):" 

215 IF A(12)-0 THEN DRAWBM162.0 

;XT$(2);" ELSE DRAWBM160.0; XT$( 

1):":DRAW"BM165.20:XA$(12):" 

220 IF A(14)-0 THEN DRAWBM4.44; 

XT$(2);" ELSE DRAWBM2 .44 ; XT$( 1 ) 

;":DRAW"BM7.64;XA$(14):" 

225 IF A(7)-0 THEN DRAWBM90.44; 

XT$(2):" ELSE DRAWBM90.44 :XTJ( 1 

);":DRAW"BM95.64:XA$(7);" 

230 IF A(8)-0 THEN DRAWBM126.44 

;XT$(2);" ELSE DRAWBM125 .44 ; XT$ 

( 1 ) : " : DRAWBM130 . 64 ; XA$( 8) ; " 

235 IF A(9)-0 THEN DRAWBM162.44 

:XT$(2):" ELSE DRAW"BM160.44;XTS 

(1):":DRAW"BM165.64:XA$(9);" 

240 IF A(10)-0 THEN DRAWBM196.4 

4;XT$(2);" ELSE DRAWBM195 ,44;XT 

$<1):":DRAW"BM200.64;XA$(10):" 

245 IF A(15)-0 THEN 0RAWBM4 .88: 

XT$(2);" ELSE DRAW"BM2.88:XT$(1) 

;":DRAW"BM7.108;XA$(15);" 

250 IF A(l)-0 THEN DRAWBM55 .88: 

XT$(2):" ELSE DRAW"BM55.88:XT$(1 



):":DRAW"BM60.108:XA$(1):" 

255 IF A(2)-0 THEN DRAWBM90.88; 

XT$(2):" ELSE DRAW"BM90.88:XT$(1 

);":DRAW"BM95.108:XA$(2):" 

260 IF A(3)-0 THEN DRAWBM126.88 

:XT$(2):" ELSE DRAW"BM125.88;XT$ 

(1):":DRAW"BM130.108;XA$(3);" 

265 IF A(4)-0 THEN 0RAWBM162 .88 

:XT$(2):" ELSE DRAW"BM160.88:XT$ 

(1):":DRAW"BM165.108;XA$(4):" 

270 IF A(5)-0 THEN DRAWBM196.88 

:XT$(2):" ELSE DRAW"BM195.88:XT$ 

(1); M :DRAWBM200.108:XA$(5):" 

275 IF A(6)-0 THEN DRAWBM230.88 

:XT$(2):" ELSE ORAW"BM230.88;XT$ 

( 1 ) : " : DRAWBM235 . 108: XA$( 6 ) : " 

280 IFA$(N-1)-N$(15) THEN FORX-1 

TO1000:NEXTX:JJ-0:GOTO1065 

285 IFA(12)<>0 THEN FORX-1TO1000 

:NEXTX:G0T01145 

290 IFM<1 THEN FORX-1TO1000:NEXT 

X:GOTO1065 

295 IFM>50000000 THEN FORX-1TO10 

00:NEXTX:GOTO995 

300 G0T0115 

305 REM CHECK ACCOUNT 

310 ORAWBM27 . 160: XL$( 1 ) ; " : DRAW" 

BM34.160:XL$(3):":DRAW"BH41.160: 

XL$(3):":DRAWBM48.160:XL$(15);" 

:DRAW"BM55.160:XL$(21):":ORAW"BM 

62.160:XL$(14):":DRAW"BM71.160;X 

L$(20):":DRAW"BM78.156;R4:":DRAW 

■•BM78.158;R4;":DRAWBM87.160:XL$ 

(19):":DRAWBM89.161:U8:" 

315 DRAWBM87.160:" 

320 U-INT(M) 

325 F0RV-1T08 

330 U-U*. 1 

335 IF U < 1 THEN 345 

340 NEXTV 

345 FORW-1TO(8-V):F$(W)-NS(0):NE 

XTW 

350 IFV-3 THEN VV-6 ELSE IF V-4 

THEN VV-5 ELSE IF V-5 THEN VV-4 

ELSE IF V-6 THEN VV-3 ELSE IF V- 

7 THEN VV-2 ELSE IF V-8 THEN VV- 

1 ELSE IF V-2 THEN VV-7 ELSE IF 

V-l THEN VV-8 

355 FOR W - VV TO 8 STEP1:U-U*10 

360 Z-FIX(U) 

365 IF2-0 THEN F$(W)-N$(0) 

370 IFZ-1 THEN F$(W)-N$(14) 

375 IFZ-2 THEN F$(W)-N$(2) 

380 IFZ-3 THEN F$(W)-N$(3) 

385 IFZ-4 THEN F$(W)-N$(4) 

390 IFZ-5 THEN F$(W)-N$(5) 

395 IFZ-6 THEN F$(W)-N$(6) 

400 IFZ-7 THEN F$(W)-N$(7) 

405 IFZ-8 THEN F$(W)-N$<8) 

410 IFZ-9 THEN F$(W)-N$(9) 

415 U-U-Z 

420 NEXTW 

425 DRAWBM95. 160: XF$(1):": DRAW" 

BM103.160;XF$(2):":DRAW"BM111.16 

0:XF$(3):":DRAW'BM119.160:XF$(4) 

;":DRAW"BM127.160:XF$(5):":DRAW" 

BM135.160:XF$(6):":DRAW"BM143.16 

0;XF$(7):":DRAW"BM151.160:XF$(8) 

430 "REM WAIT FOR INPUT 

435 H$-INKEY$ 

440 IFH$-"C" OR H$-"c" THEN SOUN 

D200.1:GOTO1035 

445 IFH$-"P" OR H$-"p" THEN SOUN 

D200.1:GOTO455 

450 G0T0435 

455 DRAWBf^.^iXLKSii-rDRAW" 



BM34.172:XL$(15);":DRAW"BM41.172 

:XL$(23):":DRAW"BM55.172:XL$(13) 

:":DRAW"BM62.172;XL$(21):":0RAW" 

BM69.172:XL$(3):":DRAW"BM76.172;- 

XLi(8):":DRAW"BM87.172:XL$(19):" 

:DRAW"BM89.173:U8:" 

460 FORX=l TO 8:H$(X)-N$(0):E(X) 

-0:NEXTX 

465 P-0 

470 F0RJ-1T08 

475 G$«INKEY$ 

480 IFG$-"0" THEN E( J)-0:H$( J)-N 

$(0):SOUND150.1:GOTO740 

485 IFG$-"1" THEN E( J)-1:H$( J)-N 

$(14):SOUND150.1:GOTO740 

490 IFG$-"2" THEN E( J)-2:H$( J)=N 

$(2):SOUND150.1:GOTO740 

495 IFG$-"3" THEN E( J )-3:H$( J )-N 

$(3):SOUND150.1:GOTO740 

500 IFG$-"4" THEN E( J)-4 :H$( J )-N 

$(4):SOUND150.1:GOTO740 

505 IFG$-"5" THEN E( J)-5:H$( J)-N 

$(5):SOUND150.1:GOTO740 

510 IFG$-"6" THEN E( J)-6:H$( J)-N 

$(6):SOUND150.1:GOTO740 

515 IFG$-"7" THEN E( J)-7 :H$( J )-N 

$(7):SOUND150.1:GOTO740 

520 IFG$-"8" THEN E( J)-8:H$( J)-N 

$(8):SOUND150.1:GOTO740 

525 IFG$-"9" THEN E( J)-9:H$( J)-N 

$(9):SOUND150.1:GOTO740 

530 IFG$-CHR$(13) THEN 555 

535 IFG$-CHR$(8) AND J-1-0 THEN 

SOUND 75.1.-GOT0475 

540 IFG$-CHR$(8) AND J-1>0 THEN 

SOUND75.1:GOTO105 

545 GOTO 475 

550 NEXTJ 

555 SOUND50.1:P-(E(1)*(10 A 7))+(E 

(2)*(10"6))+(E(3)*(10"5))+(E(4)* 

(10"4))+(E(5)*(10"3))+(E(6)*(10 A 

2))+(E(7)*(10"l))+(E(8)*(10' v 0)) 

560 IFJ-1-0 THEN 470 

565 IFJ-1-1 THEN P-P*. 0000001 EL 

SE IFJ-1-2 THEN P-P*. 000001 ELSE 

IF J-l-3 THEN P-P*. 00001 ELSE I 
F J-l-4 THEN P-P*. 0001 ELSE IF J 
-1-5 THEN P-P*. 001 ELSE IF J-l-6 

THEN P-P*. 01 ELSE IF J - 1-7 THEN 

P-P*.l ELSE IF J -1-8 THEN P-P 
570 P-P+.1:P-INT(P) 
575 IF P>M THEN 105 
580 IFB$(ll)OT$(2) AND A(11)<>0 

AND P<(M/2) THEN 105 
585 'REM GUESS HIGH OR LOW 
590 DRAW"BM170.160:U7G3E3F3:":OR 
AW"BM170.165:D7H3F3E3;":DRAW"BM1 
71.161:U7G3E3F3:":DRAW"BM171.166 
:D7H3F3E3:" 
595 GJ-INKEY$ 

600 IFG$-CHR$(94) THEN L-l:SOUND 
175.1:DRAW"BM179.160:XL$(8);":DR 
AW"BM186.160:XL$(9):":DRAW"BM193 
.160:XL$(7);":DRAW"BM200.160;XL$ 
(8):":DRAW"BM207.160:XL$(5):":DR 
AW"BM214.160;XL$(18):":GOTO615 
605 IFG$-CHR$(10) THEN L-0:SOUND 
175.1:DRAW"BM179.172:XL$(12);":D 
RAW"BM186.172:XL$(15):":DRAW"BM1 
93.172:XL$(23):":DRAW"BM200.172: 
XL$(5):":DRAW"BM207.172:XL$(18): 
":GOT0615 
610 GOTO 595 

615 'REM FIND VALUE OF CARDS 
620 FORX-1TO500:NEXTX 
625 IFA$(N)-N$(1) THEN JJ-14 ELS 
E IF A$(N)-N$(13) THEN JJ-13 ELS 
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E IF A$(N)=N$<12) THEN JJ-12 ELS 
E IF A$(N)-N$(11) THEN JJ-11 ELS 
E IF A$(N)-N$(10) THEN JJ-10 ELS 
E IF A$(N)-N$(9) THEN JJ-9 ELSE 
IF A$(N)-N$(8) THEN JJ-8 ELSE IF 

A$(N)-N$(7) THEN JJ-7 
630 IFA$(N)-NJ(6) THEN JJ-6 ELSE 

IF A$(N)-N$(5) THEN JJ-5 ELSE I 
F A$(N)-N$(4) THEN JJ-4 ELSE IF 
A$(N)-N$(3) THEN JJ-3 ELSE IF A$ 
(N)-N$(2) THEN JJ-2 
635 IFA$(N)-N$(15) THEN JJ-0 
640 IFA$(N-1)-N$(1) THEN KK-14 E 
LSE IFA$(N-1)-N$(13) THEN KK-13 
ELSE IFA$(N-1)-N$(12) THEN KK-12 

ELSE IFA$(N-1)-N$(11) THEN KK-1 
1 ELSE IFA$(N-1)-NJ(10) THEN KK- 
10 ELSE IFA$(N-1)-N$(9) THEN KK- 
9 ELSE IF A$(N-1)-N$(8) THEN KK- 
8 

645 IFA$(N-1)=N$(7) THEN KK-7 EL 
SE IFA$(N-1)-N$(6) THEN KK-6 ELS 
E IF A$(N-1)=N$(5) THEN KK-5 ELS 
E IF A$(N-1)-N$(4) THEN KK-4 ELS 
E IF A$(N-1)-N$(3) THEN KK-3 ELS 
E IF A$(N-1)=N$(2) THEN KK-2 
650 "REM DETERMINE HIGHER OR LOW 
ER 

655 IFL-1 AND JJ>KK THEN 685 
660 IFL-0 AND JJ<KK THEN 685 
665 IFL-1 AND JJ<KK THEN 700 
670 IFL-0 AND JJ>KK THEN 700 
675 IF JJ-0 THEN 700 
680 IFJJ-KK THEN 720 
685 DRAW"BM179.188;XL$(23):":DRA 
W"BM186.188;XL$(9):":DRAWBH193. 
188:XL$(14):":DRAW"BM200.188;XL$ 
(14);":DRAW"BM207.188:XL$(5):":D 
RAW"BM214.188;XL$(18):" 
690 SOUND225.2:M-M+P:A(N)-l:FORX 
-1TO750:NEXTX 
695 GOTO105 

70.0 DRAW"BM179.188:XL$(12):":DRA 
W"BM186.188:XL$(15);":DRAW"BM193 
.188;XL$(19):":DRAW"BM200.188:XL 
$(5):":DRAW"BM207.188:XL$(18);" 
705 SOUND225.2:M-M-P:A(N)-l:FORX 
-1TO750:NEXTX 
710 1FJJ-0 THEN M-0 
715 GOTO105 

720 DRAW"BM179.188:XL$(5): M :DRAW 
"BM186.188:XL$(17):":DRAW"BM193. 
188:XL$(21):":DRAW"BM200.188:XLS 
( 1 ) ; " : DRAWBM207 . 188 : XL$ ( 12 ) ; " 
725 S0UND225.1:F0RX=1T075:NEXTX: 
SOUND225.1:A(N)-l 
730 FORX-1TO750:NEXTX 
735 GOTO105 

740 IFJ-1 THEN DRAWBM95 . 172 :XH$ 
CD:" 

745 IFJ-2 THEN DRAWBM103. 172;XH 
J(2):" 

750 IFJ-3 THEN ORAWBM111 . 172: XH 
$(3):" 

755 IFJ-4 THEN DRAWBM119. 172: XH 
$(4):" 

760 IFJ-5 THEN DRAWBM127 . 172; XH 
$(5):" 

765 IFJ-6 THEN DRAWBM135. 172 : XH 
$(6):" 

770 IFJ-7 THEN DRAWBM143. 172;XH 
$(7):" 

775 IFJ-8 THEN DRAWBM151 . 172: XH 
$(8):" 

780 GOTO 550 
785 'REM SELECT CARDS 
790 CLS:PRINT@0."********SELECTI 



NG CARDS*********": 

795 F0RX-1T053:D(X)-X:NEXTX 

800 FORI-1T015 

805 F=RND(100):FORX-1TOF:NEXTX:G 

-RND(-TIMER):H-(G*100) 

810 X-INT(H) 

815 IFX>53 THEN 805 

820 IFD(X)-0 THEN 805 

825 IFX<1 THEN 805 

830 IFX-53 THEN 920 

835 IFX-53 THEN AS(I)-N$(15) 

840 IFX-2 OR X-15 OR X-28 OR X-4 

1 THEN A$(I)-N$(3) 

845 IFX-3 OR X-16 OR X-29 OR X-4 

2 THEN A$(I)-N$(4) 

850 IFX-4 OR X-17 OR X-30 OR X-4 

3 THEN A$(I)-N$(5) 

855 IFX-5 OR X-18 OR X-31 OR X-4 

4 THEN AS(I)-N*(6> 

860 IFX-6 OR X-19 OR X-32 OR X-4 

5 THEN A$(I)-N$(7) 

865 IFX-7 OR X-20 OR X-33 OR X-4 

6 THEN A$(I)-N$(8) 

870 IFX-8 OR X-21 OR X-34 OR X-4 

7 THEN A$(I)-N$(9) 

875 IFX-9 OR X-22 OR X-35 OR X-4 

8 THEN A$(I)-N$(10) 

880 IFX-10 OR X-23 OR X-36 OR X- 

49 THEN A$(I)-N$(11) 

885 IFX-11 OR X-24 OR X-37 OR X- 

50 THEN A$(I)-N$(12) 

890 IFX-12 OR X-25 OR X-38 OR X- 

51 THEN A$( I)-N$( 13) 

895 IFX-13 OR X=26 OR X-39 OR X- 

52 THEN A$(I)-N$(1) 

900 IFX-14 OR X-27 OR X-40 OR X- 

1 THEN A$(I)-N$(2) 

905 D(X)-0 

910 NEXTI 

915 RETURN 

920 J-RND(3):K-RND(3) 

925 IFJ-K THEN 835 

930 GOTO 810 

935 'REM CHECK FOR CURRENT CARD 

940 IFS-0 THEN A(1)-1:S-1 

945 IFACDO0 AND A(2)-0 THEN N- 

2 

950 IFA(2)<>0 AND A(3)-0 THEN N= 

3 

955 IFA(3)<>0 AND A(4)-0 THEN N- 

4 

960 IFA(4)<>0 AND A(5)-0 THEN N- 

5 

965 IFA(5)<>0 AND A(6)-0 THEN N- 

6 

970 IFA(6)<>0 AND A(7)-0 THEN A$ 

(7)-A$(6):N-8:A(7)-l 

975 IFA(8)<>0 AND A(9)-0 THEN N- 

9 

980 IFA(9)<>0 AND A(10)-0 THEN N 

= 10 

985 IFA(10)<>0 AND A(ll)-0 THEN 

A$(11)-A$(10):N-12:A(11)-1 

990 RETURN 

995 CLS:PRINT@0."********CONGRAT 

ULATIONS!********": 

1000 PRINT@64."Y0U HAVE BROKEN T 

HE BANK WHICH IS CURRENTLY SET 

AT $50,000,000 DOLLARS. DON'T YO 

U WISH IT WAS REAL MONEY!" 

1005 PLAYAA$+AB$:PLAYAC$+AD$ 

1010 PRINT@256."END OF GAME OPTI 

ONS: <1> START NEW GA 

ME <2> QUIT"; 

1015 GS-INKEYJ 

1020 IFG$-"1" THEN RUN 

1025 IFG$-"2" THEN CLS: PRINT"THA 
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Your copy of the rainbow is sent 
second class mail. You must notify us of 
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NKS FOR PLAYING * EA 

SY COME / EASY GO ' ! " : POKE65494 .0 

:END 

1030 GOTO 1015 

1035 'REM CHANGE CARD 

1040 IFN<-6 AND A(15)-0 THEN A(l 

5)-l:A$(N-l)-A$(15):GOTO105 

1045 IFN>-7 AND N<-10 AND A(14)- 

THEN A(14)-1:A$(N-1)-A$(14):G0 

TO105 

1050 IFNM1 AND A(13)-0 THEN A(l 

3)-l:A$(N-l)-A$(13):GOTO105 

1055 DRAW"BM10.184:XL$(14);":DRA 

W"BM17.184;XLJ(15);" 

1060 G0T0435 

1065 CLS: 1FJJO0 THEN PRINT"DUE 

TO CARELESS BETTING AND THE HOPE 

S THAT THE CARDS WOULD PLAY IN Y 

OUR FAVOR, YOU HAVE GONE";:M~0 

1070 IFJJ-0 THEN PRINT"DUE TO UN 

FORSEEN MYSTICISM IN THE CARDS 

YOU DREW. THE JOKER HIMSELF H 

AS FORCED YOU"::M-0 

1075 FORR-96 TO 416 STEP 32:G-R/ 

2: SOUNDG.l 

1080 PRINT@R."***********bankrup 
t *************** . 

1085 FORX-1TO50:NEXTX:PRINT@R." 



1090 NEXTR 

1095 FORR-416 TO 96 STEP-32:G-R/ 

2:PRINT@R." 

"::F0RX-1T025:NEXTX 

1100 PRINT®R."***********bankrup 
£*************■• . 

1105 SOUNDG.l 

1110 NEXTR 

1115 PRINT@448. "PRESS <E> TO END 

OR" 
1120 PRINT@480. "PRESS <ENTER> TO 

START NEW GAME": 
1125 G$-INKEY$ 
1130 IFGS-CHR$(13) THEN 60 
1135 IFG$-"E" THEN CLS: PRINT"THA 
NKS FOR PLAYING "EA 

SY COME / EASY GO' ! " : POKE65494.0 
:END 

1140 GOTO 1125 

1145 CLS:PRINT@0."***********GAM 
E 0VER************";:PRINT@128," 
END OF GAME OPTIONS: 
<1> CONTINUE ON WITH NEXT GAME 
<2> START NEW GAME 
<3> QUIT":" 
1150 PRINT@64."Y0U FINISHED WITH 

$"M: 
1155 G$=INKEY$ 
1160 IFG$="1" THEN 75 
1165 IFG$-"2" THEN 60 
1170 IFG$-"3" THEN CLS: PRINT"THA 
NKS FOR PLAYING "EA 

SY COME / EASY GO' ! ": POKE65494.0 
:END 

1175 GOTO 1155 

1180 CLS:PRINT" Instruc 
tions ********j n the be 
g1nning********YOU START WITH A 
GAME BOARD OF 12 CARDS PLUS 3 ' 
CHANGE CARDS'. THE 12 CARDS ARE 
ARRANGED WITH 6 CARDS ON THE BO 
TTOM ROW. 4 IN THE MIDDLE ROW. A 
ND 2 ON THE" 

1185 PRINT"TOP ROW. THERE IS 1 C 
HANGE CARD SET OFF TO THE LEFT 
F EACH ROW. WHEN THE GAME IS FIRS 
T STARTED. THE FIRST CARD ON THE 



BOTTOM ROWIS TURNED FACE-UP SO 
AS TO SHOW THE VALUE OF IT. YOU 
START WITH $20 AND ARE TRYING TO 

BREAK THE BANK." 
1190 PRINT@480. "PRESS <ENTER> TO 

CONTINUE": 
1195 GJ-INKEYS 

1200 IF G$-CHR$(13) THEN 1210 
1205 GOTO 1195 

1210 CLS:PRINT" Instruc 
tions *.******** p)ay op 

tions**********AFTER THE GAME IS 
STARTED YOU HAVE THESE OPTION 
S: <C>-CHANG 

E CARD THIS OPTION ALLOW 
S YOU TO USE THE 'CHANGE CARD' 

FOR YOUR ROW." 
1215 PRINT"YOU MAY USE THIS OPTI 
ON ONLY ONETIME PER ROW. SO USE 
IT WISELY. YOU WOULD USE THIS OP 
TION IF THECURRENT CARD IS NOT A 

VERY SAFE BET. FOR EXAMPLE. IF 
YOUR CARD WAS A 7. ODDS ON THE 
NEXT CARD ARE 50% HIGHER AND 50 
% LOWER. CHANGE THAT CARD!" 
1220 PRINT@480. "PRESS <ENTER> TO 
CONTINUE": 
1225 G$-INKEY$ 

1230 IFG$-CHR$(13) THEN 1240 
1235 GOTO 1225 

1240 CLS:PRINT" instruc 
tions ********** p]ay op 

tions********** <P>-PLAC 
E BET WHEN YOU GET A FA 
IRLY SAFE CARD TO BET ON. USE TH 
IS OPTION. IF YOU HAVE A BAD CA 
RD AND HAVE ALREADY USED YOUR 

CHANGE OPTION" 
1245 PR1NT"THEN YOU MUST MAKE A 
BET ANYWAY. BUT JUST MAKE A SMALL 

ONE TO BE SAFE. IF YOU GET A 2 
THEN BET EVERYTHING YOU HAVE B 
ECAUSE THE NEXT CARD CANNOT BE L 
OWER THAN 2. DITTO FOR THE ACE. 

NO CARD ISHIGHER THAN THE ACE." 
1250 PRINTS480. "PRESS <ENTER> TO 

CONTINUE": 
1255 G$-INKEY$ 

1260 IFG$-CHR$(13) THEN 1270 
1265 GOTO 1255 

1270 CLS:PRINT" instruc 
tions ***.****** play op 

t1ons**********IF YOU MAKE A MIS 
TAKE IN PLACINGYOUR BET. HIT THE 

BACKSPACE KEY AND THE SCREEN WI 
LL BE REDRAWN AND YOU CAN PLACE 

THE BET ALL OVER AGAIN. AS YO 
U TYPE IN YOUR" 

1275 PRINT"BET. YOU WILL HEAR A 
BEEP TO LETYOU KNOW THE NUMBER H 
AS BEEN ACKNOWLEDGED. HIT <EN 
TER> AFTER YOU KEY IN THE LAST D 
IGIT OF THEBET. IF YOUR BET IS 8 

DIGITS, YOU DON'T HAVE TO HIT 

ENTER." 
1280 PRINTO480. "PRESS <ENTER> TO 

CONTINUE": 
1285 GJ-INKEY$ 

1290 IFG$-CHR$(13) THEN 1300 
1295 GOTO 1285 

1300 CLS:PRINT" Instruc 
tions ********** play op 

tions**********AFTER YOUR BET IS 

PLACED, YOU NEED TO TELL THE 
COMPUTER IF YOUTHINK THE NEXT CA 
RD WILL BE HIGHER OR LOWER I 
N VALUE. THIS IS DONE USING THE 



UP AND DOWN" 
1305 PRINT"ARROW KEYS. RESPECTIV 
ELY. IF YOUHIT THE UP ARROW KEY. 

THE WORD 'HIGHER' WILL BE DISP 
LAYED ON THE SCREEN. HIT THE D 
OWN ARROW KEY AND THE WORD 'LOW 
ER' WILL BEDISPLAYED. A FEW SECO 
NDS LATER 'WINNER' OR 'LOSER' W 
ILL BE DIS-PLAYED." 
1310 PRINT@480. "PRESS <ENTER> TO 

CONTINUE": 
1315 GS-INKEYS 

1320 IFG$-CHR$(13) THEN 1330 
1325 GOTO 1315 

1330 CLS:PRINT" instruc 
tions ********** play op 

tions**********IF YOU LOST THE B 
ET. THE MONEY WILL BE DEDUCTED 
FROM YOUR ACCOUNT. LIKEWISE 

IF YOU WIN THEBET. THE MONEY WI 
LL BE ADDED TO YOUR ACCOUNT. NOW 

FOR THE SCARY" 
1335 PRINT"PART. ON THE TOP ROW 
THERE ARE ONLY TWO CARDS. MEANI 
NG ONLY ONEBET FOR THIS ROW. YOU 

MUST BET AT LEAST HALF OF YOUR 

ACCOUNT OR THE BET WON'T BE A 
CKNOWLEDGEDAT ALL. THIS MAKES FO 
R A QUICK WAY TO WIN ALOT OR LO 
SE ALOT." 
1340 PRINT@480. "PRESS <ENTER> TO 

CONTINUE": 
1345 G$-INKEY$ 

1350 IFG$-CHR$<13) THEN 1360 
1355 GOTO 1345 

1360 CLS:PRINT" instruc 
tions ********** p -| ay Qp 

tions**********THUS THE NAME ' E A 
SY COME / EASY GO'! OF COURSE IN 

STRIVING TO BREAK THE BANK YO 
U WILL HIT MANYDOWNFALLS AND MAY 
BE EVEN HIT THEJOKER WHICH MAKES 

YOU BANKRUPT" 
1365 PRINT"AUTOMATICALLY. IT WIL 
L TAKE MANYCONSECUTIVE GAMES TO 
BREAK THE BANK BUT IT REALLY CA 
N BE DONE! ONCE THE BANK HAS BEE 
N BROKEN YOU WILL BE REWARDED 
WITH A SONGAND A SARCASTIC REMAR 
K ABOUT THEMONEY YOU WON (WISHIN 
G IT WAS READ." 
1370 PRINTO480. "PRESS <ENTER> TO 
CONTINUE": 
1375 GS-INKEYS 

1380 IFG$-CHRJ(13) THEN 1390 
1385 GOTO 1375 

1390 CLS:PRINT" instruc 
tions ****** enc j of game 

options*******AT THE END OF EVE 
RY GAME YOU AREGIVEN THE OPTION 
TO CONTINUE WITH YOUR PRESENT 

ACCOUNT. STARTA NEW GAME. OR QU 
IT. IF YOU GO BANKRUPT OR HIT T 
HE JOKER. YOUR" 

1395 PRINT"OPTIONS ARE TO START 
A NEW GAME OR TO QUIT. IF YOU BR 
EAK THE BANK. YOU WILL GET YO 
UR VICTORY SONG AND THE OPTIONS 
TO START A NEW GAME OR QUIT. GOO 
D LUCK AND HAVE FUN WITH 'EASY C 
OME / EASY GO'. BREAK THAT BANK! 

1400 PRINT@480."HIT <ENTER> TO G 

ET THINGS GOIN'": 

1405 GWNKEYS 

1410 IFG$-CHR$(13) THEN 60 

1415 GOTO 1405 ^ 
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Would You Buy a Car You Couldn't Get Fuel For? 

Why Buy a Computer You Can't Get 

Software For? 

Many of you are now considering an alternative to the Color Computer to run OS/9. Are you really going 
to invest in an untried alternative with very limited software? Why not buy a computer that will run a UNIX 
Compatible (OS/9 like) operating system AND MS-DOS. According to published articles, this combination 
of industry-standard operating systems would run more than 90% of ALL of the software that has EVER 
been written. Compare the software bases represented below. We call these systems the OWL ATom.™ 
Can your alternative to the CoCo be fixed locally? On-site service is available most areas on the ATom. 






These highly adaptable computers we 
call the OWL ATom™ scries. They are not 
newcomers to the computer world, but are 
the current versions of computers which 
we have been building for more than 6 
years. All systems can be configured with 
your choice of hard drive, graphics 
monitor, and 6 different processors. The 
systems described here are typical of the 
new versions of our line which offer 2 
industry-standard operating systems. 



For general features of our OWL 
ATom including expansion capabilities, 
check out the table below. Comparisons 
are also given to several Tandy™ com- 
puters. The resolution of the optional 
VGA is also given. 

Typical system components; 

Processor: 80286-1 2 or 80386SX-16 

Floppy drive: 1.2 or 1.44 Meg 

Memory: 1MB 

Hard Drive: 40 MB. 28 ms. 

Monitor: TTL Monochrome 
(720X350) 

MS-DOS Software: 

MS-DOS (with all utilities) 

GWBAS1C 

Integrated Software including: 

Desktop Organizer with tracker 

Outliner 

Word Processor 



OWL ATom™ ET or SX 

Spelling Checker 
Spreadsheet 
Data Base 



Graphics program 

Communications 

UNIX Compatible Software: 

Coherent™ (A UNIX Compatible 

Operating System) 
C Compilier 
Full Screen Editor 
Line Editor 
Text Formattor 
AWK Language and Yacc 
Standard UNIX utilities 
Documentation; 
Over 1500 pages and VHS Tape 
One of the best features is the p rice; 
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Processor (Speed) 


Xll2Xfirl2) 


80286(10) 


80286(8) 




Total Slots 


8 


3 


4 




16 Bil Slots 


* 


i 







Standard Memory 


1024K 


1024K 


640K 




Max. on Board RAM 


4<Wf,K 


1024K 


768K 




Graphics Output 


VGA 


VGA 


CGA 




Max. Resolution 


W24X7nX 


640X480 


640X200 




Drive Slots 


s 


3 


3 




Hard Drive Interface 


YVsMfiRit) 


Yes(l6Bil) 


Yes(8 Bit) 




Floppy Drive 


1 .2 or 1 .44 Mpp 


1.44 Meg 


720K 




Power Supplv (Walts) 


2nn 


70 


67 




Warranty ( Paris and Labor) 


1 Year 


1 Year 


1 Year 





• Trademarks as follows: Model numbers -Tandy Corporation. MS-DOS- Microsoft. Inc.. 
OS/0 -MicroWare. Inc.. UNIX- AT&T. Inc. 



First year on-site service $45 (Most areas) 
VGA Color (800X600X256 colors) $400. 
Call 215-837-1917 for other options 

OWL- 
WARE 

P.O. Box 116 
Mertztown, PA 

19539 

Call to Order: 

(800)245-6228 

PA and Support: 

(215)837-1917 





OWL-WARE 



Proven 



On the Razor's Edge of 



he New Frontier: 



The Most Advanced Color Computer 
Drive Systems Ever Offered! 



Fast No-Halt SCSI Floppies Using Optiona 
Proven Performance for Demanding Home or 



This is ihc most advanced, fully assem- 
bclcd CoCo hard drive system offered. 
Using the optional OMTI 5200 SCSI 
controller with our Hard Drive inter- 
face, our new system will support 
no-halt floppy drives. You need not wail 
while typing or worry about clock time 
losses. Why be limited to 3 floppy 
drives? A complete system could now 
consist of 1-3 standard CoCo floppy 
drives, 1-2 (or more) hard drives, and 
1-3 no-halt floppies using standard (not 
just CoCo) OS/9 format. You can use 



single or double-sided 40 or 80 track 
drives with the SCSI no-hall controller. 

There are several new features with this 
improved interface. These include: 

• Full SASI/SCSI compatible (this al- 
lows many add-ons to the versatile 
SCSI buss) 

• No-Halt Floppies with optional SCSI 
controller allows full type-ahead 
during access 

• Low factory-direct prices 



I SCSI Controller 
Business Users 

•Fast Delivery from factory stock 

• Optional Real Time Clock with built 
in battery (3-10 year lifetime) 

• With the Clock you have 240 Bytes of 
battery backed up RAM for password 
protection or data storage! 

• Same super stable LRTech quality 



Interface Price only: $85 
Real Time Clock-RAM: $25. 



J 



20 or 30 Meg. 40 Meg. 80 Meg. 

System Prices: (Includes Hard Drive, case, & fan, SCSI Controller*, 
LR/OWL Interface, Software. Fully assembled and tested.) 

$495. $535. $875. 

Super System Prices: (LR/OWL System as above but OMTI 5200 
SCSI Controller AND 3.5" or 5.5" HD 80 Track Floppy in same case) 

$595. $645. $1039.(2 cases) 

*SCSI controller is OMTI 5100. Add $75 for OMTI 5200 with FDC. 

Introducing the Quick-Link" Interface 

Provides both a 64K Printer Buffer and Serial and Parallel Interfaces. 

Serial to Parallel Printer Interface (64K Buffer) $65. 

Converts serial computer output lo parallel printer and also provides a 64K buffer in front of the 
printer. Serial side Female DB-25and Parallel side is Centronics. Includes Centronics loCcntronics 
cable and power AC-adapler. If you need an adapter from the CoCo 4-pin serial lo DB-25 add $9. 
From 300-38.400 Baud. 



Parallel to Serial Interface (64K Buffer) 



$45. 



Same as above except II converts Centronics parallel computer output lo DB-25 Female serial. Plug 
into an IBM printer cable lo provide oiilpul lo a serial plotter. 



Parallel to Parallel (64K Buffer) 

This is parallel printer buffer with no conversion. 



$39. 



Drive System Parts 

Hard Drives 
20/30 Meg ST/PT1 $229. 

40 Meg PTI 265. 

80 Meg ST4096 590. 

SCSI Controllers 
OMTI 5100 HD Only $79. 

OMTI 5200 HD/FD 169. 

OMTI 5400 HD/FD/Tape 199. 

(Note: We have no drivers for tape yet) 

Cases and Cables 
Case, 45 Watt PS, Fan $ 1 05. 

Cable set (3 pieces) 25. 



Drives have a 1-year limited warranty. 
Other parts are 90-day warranty. 
Please Note - At these prices, only very 
limited support can be given. 



Technology 



the Color Computer Frontier 





Floppy Drive Systems 

The Highest Quality for Years of Service 
Drive Systems (Half Height, Double Sided, 

Direct Drives) <f>\ %J^3* 

Drive systems complete with drive, controller, legal DOS, cable, case, 
power supply, and manual 

Drive 1 Systems (Half Height, Double Sided, 
Direct Drives) *J> I 1 O . 

New 3.5", 720K Drives for OS-9 with case 

& Power Supply 5> I *\\d* 

Drive 1 Systems have drive, case, power supply. (You may require op- 
tional cable and/or DOS chip to use) 

Special for 0/1 Combos (0,1,2,3) $259. 
SALE Prices on Drives! 



HALF- HEIGHT DRIVE 
UPGRADES FOR RS HORIZON- 
TAL CASES 

Why only double the capacity of your 
system when you can triple in the same 
case? Kit includes: double-sided lo fit 
your case, chip t o run both sides of new 
drive, hardware, and detailed instruc- 
tions. Easy! Takes only 5 minutes! 

Model Only $119. 

500, 501, or 502 



All drives are new and fully assembled. 
We ship only FULLY TESTED and 
CERTIFIED at these low prices. We 
use Fuji, YE Data, and other fine- 
brands. No drives arc used or surplus 
unless otherwise slated lo you when 
you order. We appear lo be ihe one of 
the few advertisers in Rainbow who 
can truly make this claim. We have 7 
years experience in the CoCo disk 
drive market! We are able lo provide 
support when you have a problem. 



OWL Phones 

Order Numbers (only) 

1-800-245-6228 

1-215-682-6855 

Fax: 1-215-837-1942 

Technical Help 

1-215-837-1917 



OWL WARE Software Bundle 



Disk Tutorial/Utilities/Games 
DISK TUTOR Ver 1.1 

Learn how to use your disk drive from 
this multi-lesson, machine language 
program. This tutor takes you through 
your lessons and corrects your mistakes 
for a quick, painless disk drive introduc- 
tion. (This professionally writlen tulor 
is easily worth the bundle's total price.) 

3 UTILITIES 

A copy verify, copy, and DOS utility. 

2 GAMES 

We will select 2 games from our slock. 
These are sold for more than $20 each. 



Do not mistake this software with cheap 
"Public Domain" software which others 
offer. All of this software is copyrighted 
and professional in quality. The lutor is 
unique wilh us and has helped 
thousands of new users learn their disk 
drive. __ 



only $27.95 

(or even better) 

only $6.95 with 

any Disk Drive Purchase!! 



512K Upgrade 

Again at a popular price. Fully as- 
sembled and tested before shipping. 
Easy to install. Uses fast 120 ns. chips. 

Only $85. 

Now includes memory test, Ram Disk 
Lighting. Printer Lighting, and Back- 
up Lighting. All wilh an upgraded 
manual exclusive with OWL! 



Our prices include a discount for cash bul 
do not include shipping. 

OWL-WABE has a liberal warranty policy. Owing Ihe warranty 
period, all defective items will be repaired or replaced at our 
option at no cost to Ihe buyer except lor shipping costs. Call 
our lech number (or return. Return ol non-delecllve or un- 
i^io^e^etumsaresuBjecnc^^vic^harg^^^^ 



Drives 1 Year Warranty 



OWL-WARE 
P.O. BOX 116 

Mertztown, PA 19539 




Breakpoint 



Making Directories 



by Greg Law 

Technical Editor 



Recently I ran into a problem while 
installing new software and 
rearranging my hard drive. This 
particular problem involved cre- 
ating dozens of directories, 
moving hundreds of files to new locations 
and removing the old directories. Moving 
the files wasn't much of a problem; dsave 
and deldir came to the rescue when 1 
needed to remove the old directories. But 
simply put. makdi r made my job a lot more 
difficult. I had planned to create directories 
several levels deep, but makdi r can only 
create one directory at a time. This proved 
a slow and cumbersome process. After a 
few moments of debate. I finally decided 
that it shouldn't be difficult to write a ver- 
sion of makdi r to automatically create 
multiple-level directories. For example, in 
an attempt to create /dd/SOURCE/GAMES/ 
SMASH, the new version of makdi r should 
create /dd/SOURCE and /dd/SOURCE/GAMES. 
if necessary, and then create /dd/SOURCE/ 
GAMES/SMASH. 

The first obstacle was to split the pathlist 
into its individual components. Since the 
slash is used to separate each component, a 
search routine can be used to locate each 
slash. Rather than reinventing the wheel, I 
decided to browse through the C compiler 
manual to see if any of the library functions 
would help. On pages 4-29 and 4-30, I saw 
that index( ) returns a pointer to the first 
occurrence of the specified character in a 
string and rindext ) returns a pointer to the 



In addition to being OS-9 Online SIGop, 
Greg Law enjoys programming on all types 
of computers and has worked on systems 
ranging from the CoCo to the Burroughs 
B670t> super mainframe. He lives in Louis- 
ville. Kentucky. 



last occurrence of the specified character. 
Both functions return NULL (or zero) if the 
character is not found in the string. Before 
I sat down to write the program, I consid- 
ered the possible variations to the pathlist. 
The program must ba.nd\efull pathlists and 
relative pathlists. A full pathlist always 
starts with the drive name and contains 
every directory name needed to locate the 
desired file or directory, such as /dd/ 
SOURCE/GAMES/SMASH. A relative pathlist 
refers to the desired file or directory from 
the current directory, which might be 
SOURCE/GAMES/SMASH. GAMES/SMASH. or .../ 
SOURCE/GAMES/SMASH. 




Taking this into account made the job a 
little more complex. Since there are two 
basic methods of creating the same direc- 
tory, the program should be written to handle 
both methods without any side effects. 
Assume the current directory is the root 
directory of drive /dd. To create the desired 
directory, the basic pathlist given to ma kdi r 
can be one of the following: 

/dd/SOURCE/GAMES/SMASH 
.../SOURCE/GAMES/SMASH 
SOURCE/GAMES/SMASH 

Now that we can see the various pathlists 
next to each other, the differences are a 
little easier to determine. One of the prob- 
lems as I see it, is that the program should 
never attempt to create the root directory. 
This means the program needs to skip /dd 
and create /dd/SOURCE first. Another prob- 
lem is that the program should never at- 
tempt to create an anonymous directory. 



An anonymous directory is a series of one 
or more periods that refers to the current or 
higher-level directories (as in the second 
pathlist above). 

Now that the exceptions have been de- 
fined, we can form two rules to handle 
them. Rule 1: If the pathlist begins with a 
slash, skip the drive name. Rule 2: If the 
pathlist begins with a period, skip the anony- 
mous directories. These rules can be ap- 
plied using two simple i f statements. 

1f(path[0] — V) 
if CpathCO] — '.■) 

These statements compare the first char- 
acter in the string to a slash and a period, 
respectively. Now we need to determine 
what methods can be used to apply these 
exceptions. In the pathlists above, both the 
drive name and anonymous directories are 
separated from the first directory name by 
a slash. To handle the exceptions, the pro- 
gram needs to skip the first two slashes if 
the pathlist begins with a slash and the first 
slash if the pathlist begins with a period. 
That is, the first directory created should be 
/dd/SOURCE or .../SOURCE. 

Both exceptions can be handled with 
one routine. Remember, i ndex( ) returns a 
pointer to the first occurrence of a specified 
character in a string. A dummy pointer can 
be used to point to the second character in 
the string. The code used for this can be 
defined as ptr - path + 1. where path is 
the original pointer to the string. This allows 
indexU to locate the slash immediately 
preceding the first actual directory name to 
be created. As viewed through the dummy 
pointer (ptr). both strings are as follows: 

dd/SOURCE/GAMES/SMASH 
../SOURCE/GAMES/SMASH 
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OS-9 



The Listing: ma ked 1 r . c 

^include <modes.h> 
^include <stdio.h> 
^include <string.h> 

ma1n(argc. argv) 
int argc; 
char *argv[]; 

{ 

char *path: 
char *ptr; 
1nt 1 - 0: 

1f(argc < 2) 

help(argv[0]): 

whlle(--argc) 

{ 

ptr - path - argv[++i]: 

1f(path[0] — •/' || path[0] — '.') 
ptr - index(ptr + 1. '/' ) + 1: 

whileUptr - index(ptr. •/•)) !- 0) 

{ 

*ptr - '\0' : 

I_MakDir(path): 

*ptr - V: 

ptr++: 
} 



I_MakDir(path): 



} 



I_MakDir(path) 
char *path; 
{ 

int status: 

status - mknodtpath. 077): 

1f(status — -1) 

pr1ntf("%-40s -- ERROR %03d\n". path, errno); 
else 

printf ("%-40s -- createdW, path); 
} 



Now indext) can be used with the 
dummy pointer to locate the first slash. The 
address returned can also be assigned to the 



ptr - path: 

if(path[0] — V || path[0] 

I 

ptr++; 

ptr - index(ptr, '/'): 

ptr++: 



Figure la 




ptr - path; 



if(path[0] — V || path[0] — *.') 
ptr - indextptr + 1, '/') + 1: 



whileUptr - index(ptr. '/')) I- NULL) 
ptr++: 




wh1le((ptr - indextptr. '/')) !- NULL) 
{ 

*ptr - # \0': 

I_MakDir(path); 

*ptr - • / • : 

ptr++: 
} 

Figure 2b 



helptname) 
char *name: 

( 

pr1ntf("This utility is used to create multiple directories\n") 

printfC'and subdirectories in one pass. It will also create\n") 

printf ("all directories specified 1n a pathlist as required\n") 

pr1ntf("\n"); 

printf ("The syntax for %s is: \n". name): 

printfC %s pathlist <pathlist> <...>\n". name): 

exit(0): 



dummy pointer since the original address is 
no longer needed. The code used to per- 
form this step can be defined as 

ptr - indextptr. '/'): 

At this point, both strings are /SOURCE/ 
GAMES/SMASH. All that remains is to incre- 
ment the dummy pointer by one address 
(ptr++) so that it skips this slash. This 
makes the string SOURCE/GAMES/SMASH. 
Tying all of this together, the exception 
handler can now be written as shown in 
Figure la. 
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Remember, the pointer is incremented 
the first time to skip the initial slash or 
period. The pointer is incremented the 
second time to skip the slash preceding the 
first directory name to be created. Now the 
initial exception handler can be shortened 
by rearranging the increments as shown in 
Figure lb. 




At this point, the program deals with one 
type of pathlist regardless of the actual 
pathlist passed on the command line. 
Remember, path is still pointing to the 
original string. Now a loop can be used to 
create each of the subdirectories as re- 
quired. Before continuing any further, we 
must determine the type of loop used and 
the conditions of the loop. We know that 
index ( ) returns NULL if the specified char- 
acter isn't found in the string. We also need 
to increment the dummy pointer at the 
bottom of the loop so that index ( ) finds the 
next slash. Otherwise, i ndex( ) keeps find- 
ing the same slash over and over. With this 
in mind, awhile loop can be used as shown 
in Figure 2a. 

Now that the program is stepping through 
each of the slashes, you need to determine 
how to separate the components and create 
the actual directories. One method is to use 
a string-copy routine. Since path always 
points to the original string and ptr points 
to the current slash, the length of the current 
pathlist string can be determined by 
subtracting path from ptr: 

length - ptr - path; 
strncpy(name. path, length); 

Although this method works, it is more 
complex and slower than what 1 want. 
Remember, ptr always points to the cur- 
rent slash in the pathlist. Also. C terminates 
strings with a NULL character. Any ideas? 
What would happen if the current slash was 
replaced with a NULL character? Since the 
string is terminated at the current slash, 
path would effectively point to the current 
pathname and the remainder of the string 
would be ignored. After stuffing the NULL 
character into the string, the directory could 
be created. However, the original slash 
needs to be stuffed back into the string 
before incrementing ptr. Otherwise the 
program would create the first directory 
over and over. Now the loop can be bui It as 
shown Figure 2b. 

Examine the loop and step through it 
mentally using the pathlist /dd/SOURCE/ 
GAMES/SMASH. On entry to the loop, ptr 



points to SOURCE/GAMES/SMASH and path 
points to /dd/SOURCE/GAMES/SMASH. When 
the loop is entered the first time, ptr points 
to GAMES/SMASH and path points to /dd/ 
SOURCE. On the second pass, ptr points to 
SMASH and path points to /dd/SOURCE/GAMES. 
This brings up an important point. On the 
third pass through the loop, i ndex( ) returns 
NULL because there are no more slashes in 
the string and the loop is terminated. This 
means the last directory isn't created in the 
loop. But the string pointed to by path is 
restored to its original state so the program 
can call I_MakDir(path) immediately be- 
low the loop to create the final directory. 
Now that the basic foundation is built, 
you can focus on the last detail, which is 
handling multiple pathlists from the com- 
mand line. On entry to the program, argc 
contains the number of arguments passed 
on the command line and a rg v is an array of 
pointers to the command line parameters. 
The first argument is always the name of 
the program, so argv[0] should be skipped. 
Therefore, the first loop in the program can 
be defined as: 

1 - 0: 

while(--argc) 

( 

path - argv[++l]; 

ptr - path; 



) 



Note that pre-increment and pre-decre- 
ment operators are used so the values are 
incremented and decremented before being 
used. Remember, you don't want to use 
argv[0], so i is incremented to a value of 
1 before the assignment path - argv[i]is 
executed. Also, since the first argument is 
not being used, argc is decrement before it 
is compared to non-zero. This keeps argc 
one argument behind and i one argument 
ahead. 




The complete program is shown in List- 
ing 1. Last minute additions include the 
creation of the l_MakDir() and helpt) 
functions as well as the test at the beginning 
of the program. This test makes sure that at 
least two arguments are passed on the 
command line — the name of the program 
and the pathlist of at least one directory. If 
less than two arguments are passed, the 
help( ) function is called to explain how to 
use the program. 



The I_MakD1r() function calls the 
mknodO function to actually create the 
directory and checks the status returned 
frommknod( ).Ifmknod( ) created the direc- 
tory without any errors, the pathlist is printed 
on the screen followed by the word "cre- 
ated." Otherwise the pathlist is printed on 
the screen followed by the error code. The 
program continues creating the directories 
regardless of the status. 

You may want to add additional error 
checking to the I_MakOir() function. If 
mknodt ) returns an error condition, you can 
determine which error was detected by 
examining the contents of errno. The most 
common errors are: 

214 — no permission: The program may as 
well give up and continue with the next 
pathlist. if any. since it will not be able to 
create any subdirectories under this one. 

215 — bad pathname: This should be 
treated the same as Error 214. If the current 
directory name contains an illegal charac- 
ter, all of the subdirectories referenced in 
this pathlist may as well contain illegal 
characters. 

218 — file already exists: The program 
should continue since the user may be cre- 
ating subdirectories under pre-existing 
directories. 

235 — bad name: Same as Error 215. 

237 — system memory full: The program 
should give up totally because the kernel 
doesn't have enough free memory to per- 
form the operation. 

240-249 — device errors: These errors are 
caused by a physical hardware problem in 
the drive or a defect in the media. There's 
nothing the program can do about the error, 
so it should exit immediately. 

250 — device busy: Another process has 
the drive open in non-sharable mode. Sleep 
for a while and try again. 

252 — record is locked: Another process is 
updating the directory. Sleep for a while 
and try again. 

253 — non-sharable file busy: Another 
process has the directory opened in non- 
sharable mode. Sleep for a while and try 
again. 

You may also want to check the validity 
of the parameters passed on the command 
line. An unsuspecting user may be trying to 
figure out how to use the program by pass- 
ing wild arguments. /W\ 



30 



THE RAINBOW April 1991 




Novices niche 



Music 



CoCo3 



Music Test 

By Perry Friesen 

Music Test is a program designed to 
help budding musicians learn the lines 
and spaces on the treble and bass clefs. So 
put away those flashcards and enjoy a 
colorful Hi-Res display while you learn. 
Music Test first draws a play screen fea- 
turing a graphics display of the grand 
staff (both the treble and bass staves to- 
gether). The program uses the RND func- 
tion to select a note. Then it plays that 
note and displays a quarter note in the 
appropriate position for the pitch. You 
must then press the letter on the keyboard 
that corresponds with the displayed note. 
The TIMER function limits the response 
time, which can be changed by modify- 
ing Variable TM. If the response is correct. 
Music Test affirms your choice. If the 
response is not correct, the correct note is 
displayed. 

The Listing: MUSICTST 

1 'MUSIC TEST 

2 'WRITTEN BY PERRY FRIESEN 

3 "COPYRIGHT (C) APRIL 1991 

4 'BY FALSOFT. INC. 

5 'RAINBOW MAGAZINE 
10 HBUFF 1.300 

20 POKE65497.0 

30 A$-"C4:BM34.105;D2F2R2E2U51E2 

R2F2D4GDGDGDG0GDGDGDGDGDGDGDGDGD 

2GD4FDFDFRFRFR4EREREUEUEU4HUHUHL 

HL4GLGLGDGD4F 

40 B$-"C4;BM35.132;LH2U4EUERERER 

2FRFRF3DFD6GD2GD2GDGDGDGDGLDLDLD 

BU27BR14RDLUBD10RDLU 

50 C$-"C7;D2FU4ED5FU7RD7RU7ED8RU 

8RD7RU7FD6EU4O4EU30 

60 HSCREEN 2:HCLS2 : P0KE&HFF9A. 11 

70 A-50:NC-0:TT-10:C-0:TM=300 

80 '***DRAW PLAY SCREEN*** 

90 HCOLOR8:HPRINT(7.0)."** M U S 

I C TEST **":HC0L0R4 
100 FOR I-1T05 

110 A-A+10:HLINE(30.A)-(290.A).P 
SET 

120 NEXT I 
130 A-A+10 
140 FOR I-1T05 

150 A-A+10:HLINE(30.A)-(290.A).P 
SET 
160 NEXT I 



170 HLINE(30.60)-(30.160).PSET:H 
LINE(287.60)-(287.160).PSET:HLIN 
E(290.60)-(290.160).PSET 
180 HDRAW A$+B$:POKE65496.0 
190 '***MAIN LOOP*** 
200 C-C+1:TIMER-0:N-RND(25):V-N* 
5+45 

210 F0RI-1T025 
220 READ NN.PS.II* 
230 IFNN-N THEN250 
240 NEXT I 

250 RESTORE:HCOLOR4.2:HLINE(30.1 
80) -(290. 192). PRESET. BF:HGET( 160 
.V-30)-(175.V+5).l:HDRAW "BM160. 
"+STR$(V)+";"+C$ 
260 PLAYP$ 

270 I$-INKEY$:IFTIMER>TM THEN380 
ELSEIFI$-""THEN270 
280 HC0L0R4: I F I $<"A"0RI t>"G"THEN 
HPRINTU0. 24). "That's not a note 
!":GOTO390 

290 IF I S— II* THENGOSUB420ELSE38 


300 HPUT(160.V-30)-(175.V+5).l.P 
SET:IFCOTT THEN200 
310 NC$-STR$(NC):NW$-STR$(TT-NC) 
:SC$-STR$(NC/TT*100) 
320 HCOLOR0:HPRINT(2. 2). "Number 
correct :"+NC$ 

330 HPRINT(22. 2). "Number wrong:" 
+NW$ 

340 HPRINT(12.4)."Your score:"+S 
C$+"%" 

350 HPRINT(2.21)."** PRESS <CLEA 
R> FOR ANOTHER TEST **" 
360 I$-INKEY$: I F I $■-" "THEN360 
370 IFI$-CHR$(12)THEN20ELSEENO 
380 HC0L0R4:HPRINT(12.24)."Right 
answer 1s "+II$ 
390 PLAY"L8O3FDFD":GOTO300 
400 DATA 1.04A.A.2.04G.G.3.04F.F 
.4.04E.E.5.04D.D.6.04C.C.7.03B.B 
.8.O3A.A.9.O3G.G.10.O3F.F.11.O3E 
.E.12.03D.D.13.03C.C.14.02B.B.15 
.02A.A 

410 DATA 16.02G.G.17.02F.F.18.02 
E.E.19.O2D.D.20.O2C.C.21.O1B.B.2 
2.01A.A.23.01G.G.24.01F.F.25.01E 
.E 

420 HC0L0R4:HPRINT(12.24).I$+" 1 
s correct" :NC-NC+1:PLAY"L10O3CEG 
04C03G04L4C": RETURN 




/R\ 
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Barden's 
Buffer 



EZ Assembler 



by William Barden, Jr. 
Contributing Editor 



Forget BAS1C09, C. and Pascal. The 
fastest of all computer languages 
is machine language. Program- 
mers use an assembler program, 
which allows you to enter assem- 
bly-language mnemonics, to compile in- 
structions for the system into the native 
machine language used by the micropro- 
cessor in the computer. In the case of the 
CoCo. that microprocessor is a 6809. a clas- 
sic Motorola microprocessor with a terrific 
instruction repertoire. Assembly language 
on the CoCo results in code that is hundreds 
of limes faster than interpretive BASIC and 
dozens of times faster than BASIC09. Of 
course, there are catches to using this speed. 
Assembly language is difficult to learn and 
is a tedious language in which to write 
programs. Assembly language requires that 
you write from scratch things that other 
languages allow you to do automatically, 
such as processing with floating-point 
numbers. 

There are several assemblers available 
for the CoCo. One of the best of these is 
EDTASM+. a cassette or disk-based assem- 
bler that combines an editor, assembler, 
and debugger in one interactive package. 
Although the disk version is available by 
special order from Radio Shack, it's hard to 
get. Other assemblers may be too esoteric 
for your needs. The OS-9 assembler is a lot 
more difficult to use. (I always get death 
threats from the OS-') crowd after making 
statements like this.) This brines me to the 



Bill Burden lias written 35 hooks and hun- 
dreds of magazine articles about small 
computers . His newest Color Computer 
project. Connecting the CoCo to the Real 
World, is a hook of CoCo interfacing proj- 
ects. He has over 20 years experience in the 
industry on systems ranging from main- 
frames to micros. 



point — Barden's EZASM. This is a simple, 
screen-oriented CoCo 3 assembler that may 
give you the flavor of what assembly lan- 
guage is all about before you go into it 
whole hog. EZASM u ses a powerful subset of 
all 6809 instructions. This subset should 
cover 95 percent of your needs. It's also 
very easy to use. and the mnemonics and 
codes are generally the standard ones used 
by Motorola and EDTASM+. Along with 
providing the code, I'll provide instruc- 
tions about assembly language in general. 

Source for the Assembler 

So you can get started immediately, let 
me provide the code. The listing is the 
complete BASIC program for EZASM. The 
program runs only on a CoCo 3. 1 consid- 
ered allowing for the use of the CoCo 1 and 
2 for the assembler, but the whole package 
relies on using several dozen screen lines 
— something the CoCo 1 and 2 do not 



support. The listing is quite long, so be 
extra careful as you enter it. 

If you find the program difficult to enter. 
I'll be happy to send you a copy. To make 
it easy on your columnist, send a stamped, 
self-addressed disk mailer with suitable 
backing material. Also, include a formatted 
35-track standard CoCo disk. Do not in- 
clude a 2(K)-page listing with several dozen 
questions to be answered about the listing 
and the meaning of life. (I set things like 
this aside, meaning to answer them when I 
get lime, and they're never seen again...). 
Send to: 

William Barden. Jr. 

P.O. Box 3568 

Mission Viejo. CA 92692 

That's all until next month, at which 
time we'll look at how to use EZASM when 
entering assembly-language programs. □ 







CoCo 3 Disk ^ 






















/ 


2010 . ,; 

2110 

2180 

2250 ...... 

2340 ...... 

2410 

2540 . 
2610 ... 
2690 


161 
150 
103 
.212 

. 40 
.232 

80 

.118 
.144 


2810 .... 
2910 ... 
3000 
3090 .... 
3150 .... 
3220 
3290 
3400 .... 
3480 .... 
END 


,,..109 

, 11 

... . 72 

.... 218 

. 237 

...194 

, . 126 
.... 229 

. 100 
.... 192 






V 


170 ... 76 1050 13 

280 ........ 200 1140 171 








380 108 1220 ...190 

490 78 1320 217 




690 232 1520 126 

780 217 1640 94 

870 177 1810 146 

960 154 1910 94 






The Listing: ezasm 

100 " COCO INTERACTIVE ASSEMBLER 
110 ' COPYRIGHT 1990. WILLIAM BA 
RDEN. JR. 
120 '*************************** 


******************************* 
* 

130 ' DATA 
ICTIONARY 


* 

D 
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j40 **************************** 
******************************** 



150 'AS-TEMPORARY VARIABLE 
160 -AAS-ALLOWABLE ADDRESSING MO 
DES 

170 "AL-1 IF BINARY DATA ON SCRE 
EN 

180 -AM$-CURRENT ADDRESSING MODE 
CHARACTER CODE 

190 'AM-DECODED ADDRESSING MODE 
200 ' CH-1 IF LINE CHANGED 
210 'CP-SCREEN CHARACTER POSITIO 
N. TO 79 

220 'DI-DISPLACEMENT VALUE OF OP 
ERAND 

230 'El-EA MS BYTE 
240 -E2-EA LS BYTE 

•EA-COMPUTED EFFECTIVE ADDRE 



250 

SS 

260 

N 

270 

280 

290 

300 



'EB-LAST BINARY DATA LOCATIO 



I-GENERAL WORKING INDEX 
J-GENERAL WORKING INDEX 
L$(22)-SCREEN LINE ARRAY 
LI-NUMBER OF BYTES IN MACHI 

NE CODE 

310 'LO-CURRENT LOCATION FOR BIN 

ARY 

320 'LR-LAST SOURCE ROW USED 

330 'MIS-ALL ONE-BYTE OP CODES 

340 'M2S-ALL TWO OR THREE-BYTE 

P CODES 

350 'M3$-ALL THREE OR FOUR-BYTE 

OP CODES 



360 "ML$-CURRENT PARTIAL OP CODE 
STRING 

370 "MM$-FIRST BYTE OF MACHINE L 

ANGUAGE 

380 "MN-NUMERIC VALUE OF MNEMONI 

C 

390 'MSS-SECOND BYTE OF MACHINE 

LANGUAGE 

400 "NA-0 IF NO BINARY. 1 IF BIN 

ARY ON SCREEN 

410 "NV-NUMERIC VALUE OF OPERAND 
•OB$-ALL ONE-BYTE MNEMONICS 
•00$-OBJECT OUTPUT FILE NAME 
•PN-PASS NUMBER. OR 1 
•PS$-ALL PSEUDO OPS. MNEMONI 



420 

430 

440 

450 

CS 

460 

470 

480 



•RW-SCREEN ROW. TO 22 

'S(26)-SYMBOL TABLE 

•SA-STARTING ADDRESS FOR ASS 
EMBLED PROGRAM 

490 'SB-FIRST BINARY DATA LOCATI 
ON 

500 'SC-SAVE CHARACTER POSITION 
510 'SG-SIGN OF RELATIVE DISPLAC 
EMENT 

520 'SIS-SOURCE INPUT FILE NAME 
530 'SOS-SOURCE OUTPUT FILE NAME 
540 'SR-SAVE ROW 
550 'STS-FCC STRING 
560 'SY-CURRENT SYMBOL. WORKING 
570 'T1S-ALL TWO OR THREE-BYTE M 
NEMONICS. PART ONE 
580 "T2S-ALL TWO OR THREE-BYTE M 
NEMONICS. PART TWO 
590 "THS-ALL THREE OR FOUR BYTE 



MNEMONICS 

600 'Y-GENERAL WORKING INDEX 

610 'ZS-GENERAL WORKING STRING 

620 'ZAS-TEMPORARY FOR SINGLE CH 

ARACTER 

630 'ZC-CHAR POSITION. WORKING 

640 'ZE-ERROR CODE 

650 'ZSS-WORKING STRING FOR INDE 

XING CHARACTERS 

660 'ZTS-OP CODE FOR INDEXING TY 

PE 

g70 **************************** 

******************************** 

* 

680 ' PRELIMI 

NARY - 1 

gg0 i*************************** 

******************************** 

* 

700 CLEAR 2000.&H7EFF 

710 CLS 

720 PRINT "COCO INTERACTIVE ASSE 

M8LER 1.0" 

730 PRINT "COPYRIGHT 1990. WILLI 

AM BARDEN. JR." 

740 INPUT "SOURCE INPUT FILE:": 

SIS 

750 INPUT "SOURCE OUTPUT FILE:": 

SOS 
760 INPUT "OBJECT OUTPUT FILE:": 

00 S 

770 **************************** 

******************************** 



780 ' 



MNEMONI 



♦ Magnavox 1 CM1 35 RGB monitor - $285! (ship $10 us, 35 cdn) 

♦ Epson 3.5" bare drive (720k, incl. rails) - $59! (ship $5 us, 9 cdn) 

♦ AMT Star 2400-baud modem - $95! (ship $3 us, 6 cdn) 

♦ Tandy FD-502 disk system (complete) - $119! ($8 us, $20 cdn) 

♦ Adaptec 4000a SCSI HD controller (for Disto) - $99! (std. ship) 



C0C0PRO! RS-232 PAK!! 



Now shipping! 

Designed and produced by Marty Goodman! This serial pak is FULLY compatible 
with the Howard Medical SLOTPAK-3, and also works perfectly with a Y-cable. 
NO Multipak needed! This clever conversion of the Tandy DCModem pak 
brings NEW life to a little-used product. Available as a complete 
pa k, or buy the kit and modify your own PCM pak! vf^'eocac: 

Kit' tpZo.yt) 



GAMERS SMOR 1 



Buy too, take 20% off each! 



CALADURIL2-$38 
MINE RESCUE- $25 
KNOCKOUT- $20 
CALA0uRIL-$2Q 
SINISTAAR - $35 



OVERLORD -$29 
BASH! -$25 
SEVENTH LINK -$38 
2'89-$30 
WARRIOR KING-$30 



Tandy Flight Simulator II 
0S-9tv. « flying fun! Req.€p(fe $9,95 



Japan Scenery Disk for above 
Rare supplement from subLOGKX $24.95 



Home Publisher (Q&9,CC3)- $12.95 



WHERE IN THE WORLD IS CARMEN 
SANDIEGO?- Award-winning educational 
adventure game. Includes FREE world Almanac! 

Retail $34.95 CoCoPROi 



512k 
only $74! 



KYUM-GAI <KG. vew - $30 
THOSE DARN MARBLES - $32 



KYUM-OAI:TOBENINJA 
OS^ VERSION!* 

(HERE AT LAST!) 



I ALSO, for incredible savings on new and used C0C0 
soft- and hardware (over 250 different C0C0 items), 
send $12 for 12 monthly issues of our catalog! 




Add $4 Ship on all 
orders. COD add $4. 

Canada-add 10% addtnl. 
shipping ($5 min.) 

All prices U.S. funds 
VISA/MC add 5%. 




PRO! 



1334 BYRON AVE. 

YPSILANTI, Ml 48198 

(313) 481 -DAVE (3283) 



NEW BBS! (313) 292-4713 

3-12-2400 8-N-1 24 HRS. 
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CS AND OP CODES 

790 '*************************** 

******************************** 

* 

800 'ONE-BYTE INSTRUCTIONS - NO 
FOLLOWING BYTES - TO 29 
810 OB$-"ABX ASLA ASLB ASRA ASR 
B CLRA CLRB COMA COMB OAA DECA 
DECB INCA INCB LSLA LSLB LSRA LS 
RB MUL NEGA NEGB NOP ROLA ROLB 

RORA RORB RTS SEX TSTA TSTB " 
820 M1$-"3A485847574F5F4353194A5 
A4C5C485844543D40501249594656391 
D4D5D" 

830 'TWO- OR THREE-BYTE INSTRUCT 
IONS DEPENDING UPON IMMEDIATE OR 

EXTENDED OPRND 
840 "30 TO 103 

850 T1$-"ADCA ADCB ADDA ADDB ADD 
D ANDA ANDB ANDCCASL ASR LBCC 
LBCS LBEO LBGE LBGT LBHI LBHS BI 
TA BITB LBLE LBLO LBLS LBLT LBMI 

LBNE LBPL LBRA LBRN LBSR LBVC L 
BVS CLR " 
860 T2$-"CMPA CMPB CMPX COM DEC 

EORA EORB INC JMP JSR LDA 
LDB LDD LDU LOX LEAS LEAU LE 
AX LEAY LSL LSR NEG ORA ORB 

ORCC PSHS PSHU PULS PULU ROL R 
OR SBCA SBCB STA STB STD STU 

STX SUBA SUBB SUBD TST " 
870 M2$-"89C98BCBC384C41C4847242 
5272C2E222485C52F25232D2B262A162 
11728294F81C18C434A88C84C4E8D86C 
6CCCE8E121310114844408ACA1A34363 
537494682C287C7CDCF8F80C0834D" 
880 'INSTRUCTIONS OTHER THAN REL 
ATIVE WITH LEADING 10 
890 "104 TO 111 
900 TH$-"CMPD CMPS CMPU CMPY LDS 

LDY STS STY " 
910 M3$-"1083118C1183108C10CE108 
E10CF108F" 

920 'PSEUDO-OPS - 112 TO 115 
930 PS$-"FCB FCC FDB ORG " 
940 "ALLOWABLE ADDRESSING MODES. 

SUBTRACT HEX 40 TO FIND 000BEIX 
R WHERE 

950 "B IS OP BYTE (B-0) ; E-EXTEND 
ED:I-IMMEDIATE;X-INDEXED:R-RELAT 
IVE. 

960 AA$-" 

NNNN*NNDJJAAAAAAANNAAAAAA 

AAAAAAJNN A JJNNJZZNN' AA BBBBJJJNND 

DDDDJJNNJJZZZNN A J AAAAAA JJ " 

970 **************************** 

******************************** 

* 

980 • PREL 

IMINARY - 2 

990 **************************** 

******************************** 

* 

1000 DIM L$(22). S(26) 

1010 HSCREEN 4 

1020 HBUFF 1.300 

1030 HGET(0.0)-(111.7).l 

1040 GOSUB 3390 

1050 '************************** 

******************************** 

** 

1060 ' 

MAIN LOOP 

1070 '************************** 

******************************** 



1080 LR— 1 

1090 PN-0 

1100 AL-0 

1110 GOSUB 1220 

1120 IF CP<53 THEN HLINE( 13*8. RW 

*8)-( 13*8+7. RW*8+7). PRESET. BF EL 

SE HLINE(53*8. 

RW*8+7 ) - ( 53*8+7 . RW*8+7 ) . PRESET. B 

F 

1130 GOSUB 2140 

1140 RW-RW+1 

1150 IF RW-23 THEN RW-0: IF CP<4 

THEN CP-54 ELSE CP-14 

1160 IF CP>53 THEN CP-54 ELSE CP 

-14 

1170 GOTO 1110 

1180 '************************** 

******************************** 

** 

1190 ' 

EDITOR 
1200 ' ************************** 
******************************** 
** 

1210 'SUBROUTINE TO ENTER LINE 

F TEXT 

1220 ZA$-INKEY$: IF ZA$-"" THEN 

HLINE (CP*8.RW*8+7)-(CP*8+7.RW*8 

+7).PSET.B: HLINE (CP*8 

. RW*8+7 ) - (CP*8+7 . RW*8+7 ) . PRESET, 

B: GOTO 1220 

1230 -***UP ARROW*** 

1240 IF ZA$OCHR$(94) THEN GOTO 

1300 

1250 IF CH-1 THEN CH-0: GOSUB 21 

40 

1260 RW-RW-1 

1270 IF RWO-1 THEN GOTO 1220 

1280 IF CP>39 THEN RW-22: CP-14: 

GOTO 1220 ELSE RW-22: CP-54: GO 
TO 1220 

1290 -***DOWN ARROW*** 
1300 IF ZA$OCHR$(10) THEN GOTO 
1360 

1310 IF CH-1 THEN CH-0: GOSUB 21 
40 

1320 RW-RW+1 

1330 IF RW<>23 THEN GOTO 1220 
1340 IF CP>39 THEN RW-0: CP-14: 
GOTO 1220 ELSE RW-0: CP-54: GOTO 

1220 
1350 -***LEFT ARROW*** 
1360 IF ZA$OCHR$(8) THEN GOTO 1 
400 

1370 CP-CP-1 

1380 IF CP-13 THEN CP-38: GOTO 1 
220 ELSE IF CP-53 THEN CP-78:G0T 
1220 ELSE GOTO 1220 
1390 -***RIGHT ARROW*** 
1400 IF ZA$OCHR$(9) THEN GOTO 1 
440 

1410 CP-CP+1 

1420 IF CP-39 THEN CP-14: GOTO 1 
220 ELSE IF CP-79 THEN CP-54: GO 
TO 1220 ELSE GOTO 1220 

1430 -***CLEAR CURRENT PROGRAM** 

* 

1440 IF ZA$OCHR$(12) THEN GOTO 

1490 

1450 ZA$-INKEY$: IF ZA$-"" THEN 

GOTO 1450 ELSE IF ZA$OCHRJ(12) 

THEN GOTO 1490 

1460 GOSUB 3390 

1470 RETURN 



1480 -***F1-ASSEMBLE. SAVE SOURC 

E AND BINARY*** 

1490 IF ZA$OCHR$(103) THEN GOTO 

1650 
1500 PN-1 
1510 GOSUB 3530 

1520 LO-&H7F00: SC-CP: SR-RW: CP 
-14 
1530 FOR RW-0 TO 22: GOSUB 2150: 

NEXT 
1540 CP-54 
1550 FOR RW-0 TO 22: GOSUB 2150: 

NEXT 
1560 OPEN"0".#l.SO$ 
1570 FOR 1-0 TO 22: WRITE#1 . L$( I 
): NEXT I 
1580 CLOSE 1 

1590 IF SBO0 THEN SAVEM 00$. SB. 
EB.SA 

1600 CP-SC: RW-SR 
1610 AL-1 
1620 PN-0 
1630 GOTO 1220 

1640 -***F2-READ SOURCE. NO BINA 
RY*** 

1650 IF ZA$OCHR$(4) THEN GOTO 1 
810 

1660 GOSUB 3510 
1670 HCLS 

1680 OPEN-I" J1.SI$ 
1690 CP-14: RW-0 
1700 FOR 1-0 TO 22: INPUT#1. L*( 
I): NEXT 

1710 FOR 1-0 TO 22: IF MID$(L$(I 
).1.39)-STRING$(39." ") THEN HPR 
INT (0.1). 

" : N 

EXT ELSE HPRINT (O.I). 

MID$(L$(I).1.39): NEXT 
1720 FOR 1-0 TO 22: HPRINT (39,1 
).A$: NEXT 

1730 FOR 1-0 TO 22: IF MID$(L$(I 
).41.38)-STRINGS(38." " ) THEN HP 
RINT (40.1). 



NEXT ELSE HPRINT (40.1). 

MID$( L$( I ) .41 .38) : NEXT 
1740 GOSUB 3570 
1750 CLOSE 1 

1760 LO-&H7F00: PN-0: CP-14 
1770 FOR RW-0 TO 22: GOSUB 2150: 
NEXT 
1780 CP-54 
1790 RW-0: CP-14 
1800 GOTO 1220 

1810 -***LOOK FOR SHIFT. UP ARRO 
W*** 

1820 IF ZA$OCHR$(95) THEN GOTO 
1940 

1830 IF AL-1 GOSUB 3510: AL-0 
1840 IF CP>40 THEN J-RW: GOTO 18 
90 

1850 IF RW-22 THEN GOTO 1870 
1860 FOR I-RW TO 21: MID$(L$(I). 
1.38)-MI0$(L$(I+1).1.38): NEXT 
1870 MID$(L$(22).1.38)-MID$(L$(0 
).41.80) 
1880 J-0 

1890 IF J-22 THEN GOTO 1910 
1900 FOR I-J TO 21: MID$(L$(I),4 
1.80)-MID$(L$(I+1),41.80): NEXT 
1910 MIDJ(L$(22). 41.80)-" 

1920 HCLS: GOSUB 1710 
1930 RETURN 
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1940 "***LOOK FOR SHIFT. DOWN AR 

ROW*** 

1950 IF ZA$OCHR$(91) THEN GOTO 

2050 

1960 IF AL-1 THEN GOSUB 3510: AL 

-0 

1970 IF CP>40 THEN J-RW ELSE J-0 

1980 FOR 1-21 TO J STEP -1: MID$ 

(L$(I+1).41.39)-MI0$(L$(I).41.29 

): NEXT 

1990 MID$(L$(J). 41.39)-" 

2000 IF CP>40 THEN GOTO 2040 

2010 MID$(L$(0).41.39)-MID$(L$(2 

2). 1.38) 

2020 FOR 1-21 TO RW STEP -1: MID 

$(L$(I+1).1.38)-MID$(L$(I).1.38) 

: NEXT 

2030 MID$(L$(RW).1.38)-" 

2040 GOTO 1920 

2050 CH-1 

2060 IF ZA$-CHR$(13) THEN RETURN 

2070 GOSUB 3290: HPRINT (CP.RW). 

ZA$ 

2080 CP-CP+1 

2090 IF ((CP-39) OR (CP-79)) THE 

N RETURN 

2100 GOTO 1220 

2110 *************************** 

******************************** 

** 

2120 ' A 

SSEMBLER 



2130 *************************** 
******************************** 



2140 'SUBROUTINE TO PROCESS LINE 
OF TEXT 
2150 IF CP>53 THEN ZC-55 ELSE ZC 



-15 
2160 



IF MID$(L$(RW).ZC.14)-" 
" THEN RETURN 
2170 '***FIRST PROCESS POSSIBLE 
SYMBOL*** 

2180 IF MID$(L$(RW).ZC.1)<>" " T 
HEN SY-ASC(MID$(L$(RW).ZC.D) EL 
SE GOTO 2220 
2190 IF MID$(L$(RW).ZC+1.1)<>" " 

THEN ZE-2: GOTO 3330 
2200 IF ((SY>64) AND (SY<91)) TH 
EN GOTO 2210 ELSE ZE-1: GOTO 333 


2210 SY-SY-65: IF S(SY)— 1 THEN 
S(SY)-LO ELSE IF (PN-0) AND (S(S 
Y)OLO) THEN ZE-1: G 

OTO 3330 

2220 '***NOW FIND 5 CHARACTERS 
F MNEMONIC*** 
2230 ZC-ZC+2 
2240 IF MID$(L$(RW).ZC+5.1)<>" " 

THEN ZE-2: GOTO 3330 
2250 MN-INSTR(OB$.(MID$(L$(RW).Z 
C.5))): IF MN-0 THEN GOTO 2300 
2260 IF MID$(L$(RW).ZC+5.7)<>" 

" THEN ZE-3: GOTO 3330 
2270 MN-(MN-l)/5 
2280 ML$-MID$(M1$.MN*2+1.2) 



2290 GOTO 2610 

2300 MN-INSTR(T1$.MID$(LS(RW).ZC 

.5)): IF MNO0 THEN MN-(MN-l)/5: 

GOTO 2320 
2310 MN-INSTR(T2$.MID$(L$(RW).ZC 
.5)): IF MN-0 THEN GOTO 2330 ELS 
E MN-(MN-l)/5 + 32 
2320 ML$-MID$(M2$.MN*2+1.2): MN- 
MN+30: GOTO 2370 
2330 MN-INSTR(TH$.MIDJ(L$(RW).ZC 
.5)): IF MN-0 THEN GOTO 2350 
2340 ML$-MID$(M3J.((MN-l)/5)*4+l 
.4): MN-(MN-l)/5 + 104: GOTO 237 

2350 MN-INSTR(PS$.MID$(L$(RW).ZC 

.5)): IF MN-0 THEN ZE-3: GOTO 33 

30 ELSE MN-C(MN-l)/ 

5)+112 

2360 '***NOW FIND OPERAND TYPE** 

* 

2370 EA-99999: NV-99999: DI-9999 

9: ST$-"" 

2380 ZC-ZC+6 

2390 "FIRST LOOK FOR $XXXX - EXT 

ENDED ADDRESSING - MUST BE HEX 

2400 IF MID$(L$(RW).ZC.l)-"$" TH 

EN EA-VAL("&H"+MID$(L$(RW).ZC+1. 

4)): IF EA-0 THEN ZE-4: 

GOTO 3330 ELSE GOTO 2610 

2410 'LOOK FOR #$XXXX - IMMEDIAT 

E TWO OR FOUR DIGIT HEX 

2420 IF MID$(L$(RW).ZC.2)-"#$" T 

HEN NV-VAL("&H"+MID$(L$(RW).ZC+2 

.4) ): GOTO 2610 



Classic Solitaire 

Klondike • Pyramid • Canfield 




©@©MI 




Play these classic favorites in 16 color high-res graphics 
128KCoCo3 One Disk Drive Joystick $14.95 



'^ASW.WlSW.WftVAW-SWiV'W* 



La Belle Lucie Solitaire 

This solitaire is not for the faint of heart! Hoyle rules. 



128KCoCo3 One Disk Drive Joystick $14.95 
software submissions invited^^^ 

Tazman (CoCo3)(requires OS9/II & 512K) $24.95 

(A game of Space Commerce) 
Armchair Admiral (CoCo3) $14.95 

(Battleship - play friends or computer!) 
Riddle of the Ring (CoCo3/CoCo2) $10.00 

(Text adventure) 
Games Pack I (CoCo3/CoCo2) $10.00 

(Hangman. Concentration. Mastermind) 
Zenix (CoCo3) $29.95 

(Arcade. Superb graphic movement) 
Zenix Demo Disk (CoCo3) $2.00 



Checks, Money Orders, MasterCard & Visa $2.00 S&H. 
COD additional $2.00. WA addresses add 8.2% sales tax. 

30 day money back guarantee 
(206) 653-5263 



Eversoft Games, Ltd 

P.O. Box 3354 
Arlington, Wa 98223 J 



10am -6pm PST 



OS9/68000 
JUST THE FACTS! 

The PT68K4 SINGLE BOARD 
COMPUTER - As seen at the 
ATLANTA COCOFEST -is available 
for IMMEDIATE SHIPMENT in 
Assembled or Kit Form! 

Upgrade to a powerful 68000 
microprocessor on an XT-size system 
board with 4 serial/2 parallel ports 
and up to 12MB of memory. The 
K4 is IBM PC/XT hardware 
compatible - and also supports VGA, 
SVGA plus high density floppy 
drives! 

16MHZ PT6SK4 Assembled Board 
with 1MB DRAM - 999.00 

BARE BONES KIT: System Board, 
1MB RAM, Cabinet, PS, High 
Density Floppy, OS9 - 3KX9.00 

Professional OS9 Operating System 
with C COMPILER $299.00 

See the DELMAR AD for systems 
information! 

PERIPHERAL 
TECHNOLOGY 

1480 TERRELL MILL RD. #870 
MARIETTA, GA 30067 
404/984-0742 

OS9 i* a trademark of Microware 
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2430 'LOOK FOR //XXXXX - IMMEDIAT 
E DECIMAL 

2440 IF MID$(L$(RW).ZC.1)="#" TH 
EN NV-VAL(MID$(L$(RW).ZC+1.5) ): 

GOTO 2610 
2450 "LOOK FOR + OR - WITH XXX. R 
2460 IF (MID$(L$(RW).ZC.1X> M -" 
AND MIDJ(L$(RW) .ZC.l )<>"+") THEN 

GOTO 2500 
2470 ZS$~MID$(L$(RW).ZC+4.2): IF 

(ZS$<>".Y" AND ZS$<> M .X" AND ZS 
$<>".U" AND ZS$<>".S") 
THEN ZE-5: GOTO 3330 
2480 IF ZSS-".X" THEN ZT$-"88" E 
LSE IF ZS$-".Y" THEN ZT$-"A8" EL 
SE IF ZS$-".U" THEN ZT$-"C 
8" ELSE ZT$-"E8" 
2490 DI-VAL(MID$(L$(RW),ZC.4)): 
GOTO 2610 

2500 IF MN<112 THEN GOTO 2560 
2510 IF MNOH3 THEN GOTO 2540 
2520 FOR I-ZC TO ZC+15: IF MID$( 
L$(RW). I. 1 )-"#" THEN GOTO 2530 E 
LSE ST$-ST$ + MID$(L$(RW) 
.1.1): NEXT 
2530 GOTO 2610 
2540 IF MID$(L$(RW).ZC+5.1)<>" " 

THEN ZE-5: GOTO 3330 ELSE NV-VA 
L(MID$(L$(RW).ZC,5)): GOTO 2610 
2550 "MUST BE SYMBOLIC ADDRESS H 
ERE 
2560 IF MID$(L$(RW).ZC+1.1)<>" " 

THEN ZE-5: GOTO 3330 
2570 SY-ASC(MID$(L$(RW).ZC.l)) - 

65 
2580 IF (SY<0 OR SY>25) THEN ZE- 
5: GOTO 3330 
2590 IF S(SY)<>-1 THEN EA-S(SY): 

GOTO 2610 ELSE IF PN-1 THEN ZE- 
1: GOTO 3330 

2600 IF CP>53 THEN HPRINT (53. RW 
),"#": EA-0 ELSE HPRINT (13. RW). 
"#": EA-0 
2610 '***NOW HAVE VALID MNEMONIC 

AND ARGUMENT. CONSTRUCT MACHINE 

LANGUAGE*** 
2620 IF CP>39 THEN ZC-40 ELSE ZC 
-0 

2630 IF MN>29 THEN GOTO 2770 
2640 LI— 1 

2650 IF CP>39 THEN IF RW+22<LR T 
HEN IF PN-0 THEN GOSUB 3530: GOT 
2700 

2660 IF CP<-39 THEN IF RW<LR THE 
N IF PN-0 THEN GOSUB 3530: GOTO 
2700 

2670 IF PN-0 THEN GOTO 2700 
2680 HPRINT (ZC. RW) . RIGHT$("0000 
"+HEX$(L0).4)+" "+ML$ 
2690 FOR 1-0 TO LEN(ML$ )/2- 1 : PO 
KE LO+I. VAL("&H"+MID$(ML$. 1*2+1 
.2)): NEXT 

2700 IF SBHO THEN SB-LO 
2710 LO-LO+LI 
2720 EB-LO-1 

2730 IF CP>39 THEN IF RW+22>LR T 
HEN LR-RW+22 

2740 IF CP039 THEN IF RW>LR THE 
N LR-RW 
2750 RETURN 

2760 "FIRST CHECK FOR RELATIVE A 
DDRESSING 

2770 IF MN>111 THEN GOTO 3170 
2780 AM$-MID$(AA$.MN+1.1) 
2790 IF AMJO"A" THEN GOTO 2880 
2800 IF MN-56 THEN ML$-"16": LI- 



3: GOTO 2830 

2810 IF MN-58 THEN ML$-"17": LI- 

3: GOTO 2830 

2820 ML$-"10"+ML$: LI-4 

2830 EA-EA-LO-LI: IF EA<0 THEN S 

G-l: EA-ABS(EA) ELSE SG-0 

2840 El-INT(EA/256): E2-EA-(E1*2 

56) 

2850 IF SG-1 THEN E2-256-E2: El- 

255-E1: IF E2-256 THEN E2-0: El- 

El+1 

2860 ML$-ML$+RIGHT$("00"+HEX$(E1 

).2)+RIGHT$("00"+HEX$(E2).2) 

2870 GOTO 2650 

2880 'NOW CHECK FOR IMMEDIATE AD 

DRESSING 

2890 IF NV-99999 THEN GOTO 2950 

2900 AM-ASC(AM$)-&H40 

2910 IF (AM AND 4)<>4 THEN ZE-4: 

GOTO 3330 
2920 IF (AM AND 16)<>16 THEN MLS 
=ML$+RIGHT$("00"+HEX$(NV).2) ELS 
E ML$-ML$+RIG 

HT$("0000"+HEXt(NV).4) 
2930 LI-LEN(MLS)/2: GOTO 2650 
2940 ML$-ML$+RIGHT$("0000"+HEX$( 
NV).4): LI-3: GOTO 2650 
2950 "NOW CHECK FOR EXTENDED ADD 
RESSING 

2960 IF EA-99999 THEN GOTO 3030 
2970 AM-ASC(AM$)-&H40 
2980 IF (AM AND 8)<>8 THEN ZE-4: 

GOTO 3330 
2990 IF LEN(ML$)-4 THEN MMS-LEFT 
$(ML$.2) ELSE MM$-"" 
3000 IF LEN(ML$)-4 THEN MSS-RIGH 
T$(ML$,2) ELSE MS$-ML$ 
3010 ML$-MM$+RIGHT$("00"+HEX$(VA 
L("&H"+MS$)+48).2)+RIGHT$("0000" 

+ HEX$(EA).4) 
3020 LI-LEN(MLJ)/2: GOTO 2650 
3030 'NOW CHECK FOR INDEXED ADDR 
ESSING 

3040 IF DI-99999 THEN ZE-10: GOT 
3330 

3050 IF DD127 OR DK-128 THEN Z 
E-ll: GOTO 3330 
3060 IF DI<0 THEN DI-256+DI 
3070 AM-ASC(AM$)-&H40 
3080 IF (AM AND 2)<>2 THEN ZE-10 
: GOTO 3330 

3090 IF LEN(ML$)=4 THEN MMS-LEFT 
$(ML$.2) ELSE MM$-"" 
3100 IF LEN(ML$)-4 THEN MSJ-RIGH 
T$(ML$.2) ELSE MS$-ML$ 
3110 ML$-MMS+RIGHT$("00"+HEX$(VA 
L("&H"+MSS)+32) ,2)+ZT$+RIGHT$("0 
000"+ HEX$(DI).2) 

: LI-LEN(ML$)/2: GOTO 2650 
3120 GOTO 2650 

3130 'CHECK FOR OP-CODE FCB OR G 
REATER 

3140 IF EA099999 THEN ML$-LEFT$ 
(ML$.2)+RIGHT$("00"+HEX$(VAL("&H 
"+MID$(ML$.3.2)) +48). 2)+ RI 

GHT$("0000"+HEX$(EA).4): LI-4: G 
OTO 2670 

3150 IF NV099999 THEN IF NV>655 
35 THEN ZE-6: GOTO 3330 
3160 IF NV099999 THEN MLS-MLS+R 
IGHT$("0000"+HEX$(NV).4): LI-4: 
GOTO 2670 

3170 'CHECK FOR FCB 
3180 IF MN-112 THEN IF ( NV-9999 
9 OR NV>255 ) THEN ZE-6: GOTO 33 
30 ELSE ML$-RIGHT$ 



("00"+HEX$(NV).2):LI-l: GOTO 267 



3190 'CHECK FOR FCC * 

3200 IF MN-113 THEN ML$-CHR$(34) 

+LEFT$(ST$.6)+CHR$(34): LI-LEN(S 

T$): GOTO 2670 

3210 'CHECK FOR FDB 

3220 IF MN-114 THEN IF NV>65535 

THEN ZE-6: GOTO 3330 ELSE MLS-RI 

GHT$("0000"+HEX$ (NV).4): LI 

-2: GOTO 2670 

3230 'CHECK FOR ORG 

3240 IF MNM15 THEN IF EA-99999 

THEN ZE-6: GOTO 3330 

3250 LO-EA: ML$-"": LI-0: GOTO 2 

670 

3260 ' ************************** 

******************************** 

** 

3270 ' UTILI 

TY SUBROUTINES 

3280 '************************** 

******************************** 

** 

3290 '***SUBROUTINE TO CLEAR CUR 

RENT CHARACTER POSITION AND STOR 

E CHAR*** 

3300 HLINE (CP*8.RW*8)-(CP*8+7.R 

W*8+7). PRESET. BF 

3310 M1D$(L$(RW).CP+1.1)-ZA$ 

3320 RETURN 

3330 '***ERROR PROCESSING FOR LI 

NE*** 

3340 IF CP>53 THEN ZC-53 ELSE ZC 

-13 

3350 HLINE (ZC*8. RW*8)- (ZC*8+7. R 

W*8+7). PRESET. BF 

3360 HPRINT (ZC.RW)."*" 

3370 RETURN 

3380 '***CLEAR EVERYTHING SUBROU 

TINE*** 

3390 LO-&H7F00: SA-LO: SB-LO 

3400 PN-0 

3410 FOR 1-0 TO 22: L$(I)-" 



"+A$+" 



NEXT 



3420 FOR 1-0 TO 26: S(D— 1: NEX 

T 

3430 GOSUB 3510 

3440 HCLS 

3450 CP-14: RW-0 

3460 A$-CHR$(124) 

3470 FOR Y-0 TO 22: HPRINT (0.Y) 



": NEXT 

3480 FOR Y-0 TO 22: HPRINT (39. Y 

).A$: NEXT 

3490 GOSUB 3570 

3500 RETURN 

3510 '***CLEAR BINARY DATA AND S 

CREEN*** 

3520 FOR 1-0 TO 26: S(D— 1: NEX 

T 

3530 FOR 1-0 TO 22: HPUT(0.I*8)- 

(103. 1*8+7). l.PSET: NEXT 

3540 FOR 1-0 TO 22: HPUT(320.I*8 

)-(423. 1*8+7). l.PSET: NEXT 

3550 RETURN 

3560 '***PRINT TITLE*** 

3570 HPRINT (0.24) . "BARDEN'S EZA 

SM: Fl SAVES/F2 LOADS/CLEAR/SHFT 

.UP ARR DELETES/SHFT.DN ARR INSE 

RTS" 

3580 RETURN 
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C BASIC Editor/Compiler 

The ULTIMATE Color Computer 
Basic Compiler!!! 

II you want lo write fasl machine language programs 
but you don'l want to spend the next lew years trying 
to write them In Assembly Language . then CBASIC Is 
the answerlll 

CBASIC is the only fully integrated Basic Compiler and 
program editing system available (or the Color 
Computer. It will allow you to take lull advantage of all 
the capabilities available in your color computer 
without having to spend years trying to learn assembly 
language programming. CBASIC allows you to 
create, edit and convert programs from a language 
you are already larniliar with Extended Disk Color 
Basic, into fast efficient machine language programs 
easily and quickly. 

"The most complete Editor/Compiler I have 
seen lor the CoCo... "-The RAINBOW March 

1986 

CBASIC is a powerful lool for the Beginner as well 
as the Advanced Basic or M.L. programmer. CBASIC 
features well over 150 compiled Basic Commands and 
Functions that fully support Disk Sequential and Direct 
access files, Tape, Printer and Screen 10. CBASIC 
supports ALL the High and Low Resolution Graphics, 
Sound, Play and String Operations available in 
Enhanced Color Basic, including Graphics H/GET, HI 

PUT, PLAY and H/DRAW, all with 99% syntax 
compatibility. 

Specify Coco 1, 2 or 3 Disk $149.00 



[ 51 2K Only $99 J 

Give your COCO 3 all the power it deserves with this 
easy to install (no soldering/plug in) 1 00% Tandy 
compatible 512K memory upgrade. Completely 
assembled and tested. Includes Ramdisk & Memory 
Test software described below. $99 or get 51 2K and 
Window Master lor just $149 and save $20.0011 



c 



Co Co 3 Turbo Charger 



J 



Turbo Charge your 512k Coco 3 with this ALL Machine 
Language program that will run your machine al 
double speed all the time even lor floppy disk access 
and give you 2 ULTRA High Speed Ram Disks. It's 
Reset protected so it won't disappear like other 
Ramdisk programs. You also get a 51 2K memory 
tester program, it performs several bit tests as well as 
an address test. 

Requires 512K & DISK $19.95 
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EDT/ASM III 



J 



EDT/ASM III is a Disk based co-resident Text Editor & 
Assembler. It is designed to lake advantage ol the 
new leatures ol the COCO 3. It has 8 Display for- 
mats from 32/40/64/80 columns. The disk also con- 
tains a Iree standing ML Debug Monitor. 
EDT/ASM III has the most powerful, easy to use Text 
Editor available in and Editor/Assembler package lor 
the Color Computer. 

• Local and Global string search and/or replace. 

• Full Screen line editing. 

• Load and Save standard ASCII formatted files. 
■ Block Moce & Copy, Insert, Delete, Overtype. 

• Create and Edit files larger than memory. 
The Assembler features include: 

• Conditional If/Then/Else assembly. 

• Disk Library files up to 9 levels deep. 

• Supports standard Motorola directives. 

• Allows multiple values in FCB/FDB directives. 

• Allows assembly from Buffer, Disk or both. 

Specify Coco 1, 2 or 3 Disk $59.95 




Window Master 
V3.0 




CFXIEB3 /IIS UUMM/M 



The Ultimate User Friendly Point & Click operating 
System for your Coco 3. Simple enough even for 
children to use, just point and click to run programs, 
select (iles. do disk or Hie maintenance or almost any 
task you currently do by typing commands. You also 
get things like a print spooler, Programmable Function 
Keys, a Buffered Keyboard, Ramdisk, Serial I/O port 
and Deluxe Pak support along with Windows, Icons, 
Buttons, Pull Down Menus, Edit Fields and Mouse 
lunctions all in one program. It has multiple lonts in 54 
possible sizes and styles, Enhanced Basic Editing and 
much much more. It add over 50 commands and 
Functions to Basic to fully support the Point & Click 
System without OS9. 

"..It oilers so many leatures that It Is probably 
underpriced. I recommend this software to all 
CoCo3 owners." -The Rainbow Feburary 1989 

It is completely compatible with existing Basic 
programs and takes absolutely no memory away from 
basic. It requires 1 Disk Drive, R.S. hires interlace 4 
Joystick or Mouse. 
Includes 128 & 51 2K Versions for only $69.95 



( Window - Ware J 

Window Writer- A point & dick Word Processor, 
leatures both Mouse & Keyboard type editing, 
proportional printer support, powerful formatting 
capability, works with any printer. On screen Italic, 
bold etc. WYSIWYG 
"Window Writer Is a powerlul word processor 

that Is lun to use, very user friendly. The 

Envlomment compares favorably to that of 

Microsoft Windows " - RAINBOW Dec. 1989 

Requires Window Master & 512K - $59.95 

Window Writer/W - same as above lor non Window 

Master owners, 51 2K & Disk $79.95 

window Basic Compiler-similar to CBASIC only it 

compiles all the Wndow Basic Statements lo create 

super last Machine Language programs & Desk 

Accessories. $99.00 

Wi ndow Edt/Asm - A full featured Editor & Assembler 

for Window Master. $49.95 

Font/Icon Editors - A utility disk with the Font & Icon 

Editors to create or edit your own, includes Basic & 

M.L. versions $19.95 

Advanced Programmers Guide- A guide lor Basic 

& M.L. programmers on interlacing to Wndow Masters 

complete system including System Calls, Memory 

Map, Interrupt handling & Memory Access. $24.95 

The Memory oame - A point & Click concentration 

game, lots ol lun. $1 9.95 

Desk Accessory Pak - Installs up to 7 resident DA 

programs, including: Font & Icon Editors, Function 

Keys, Terminal program. Graphics Editor & Calendar 

and more. $39.95 
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"The Source" 
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The SOURCE will allow you to easily and quickly 
Disassemble machine language programs directly 
Irom disk and generate beautiful, Assembler Source 
Code. And " The Source" has all the features and 
functions you are looking for in a Disassembler . 

• Automatic Label generation. 

• Allows specifying FCB, FCC and FDB areas. 

• Disassembles programs directly from Disk. 

• Automatically locates addresses. 

• Output listing to the Printer, Screen or both. 

• Generates Assembler source directly to disk. 

• Built in Hex/ASCII dump/display. 

• 8 Selectable Display formats 32/40/60/80. 

• Built in Disk Directory and Kill file commands. 

• Menu display with single key commands. 
" Written in Ultra fast machine language. 

Specify Coco 1, 2 or 3 Disk $49.95 
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DataPack III Plus V1.1 
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AUTOPILOT and AUTO-LOG Processors 
X-MODEM DIRECT DISK FILE TRANSFER 
VT-100 & VT-52 TERMINAL EMULATION 

■ No lost data even at 2400 Baud on the Serial I/O port. 

• 8 Selectable Display Formats, 32/40/64/80 columns 

• ASCII & BINARY disk We transfer via XMODEM. 

• Directly record receive data (Data Logging). 

• VT-100 emulation lor VAX, UNIX and other systems. 

• VT-100/52 cursor keys, position, PF & Alt. Kbd. keys. 

■ Programmable Word Length, Parity, Stop Bits 

■ Complete Full and Hall Duplex operation, 

• Send full 128 character set from Keyboard . 

■ Complete Editor, Insert, Delete. Change or Add . 

• 9 Variable length, Programmable Macro Key buffers. 

• Programmable Printer rates from 1 10 to 9600 Baud. 

• Send Files from the Buffer, Macro Key Buflers or Disk. 

• Display on Screen or Print the contents ol the Butler. 

• Freeze Display & Review information On line . 

• Built in Command Menu (Help) Display. 
Supports: Modem-Pak & Deluxe Pak or Serial Port 

S pecify Coco 1. 2, 3 Disk $49.95 

[ Money Saving Specials J 

Window Master and Writer....$99.00 
Adv. Pgm Guide and DA Pak...$49.00 
Font/lcon Editors & Memory Game $19.95 
Edt/Asm III and The Source...$89.00 
CBASIC Editor/Compiler $1 25.00 



To order by mail, send check or money order lor the 

amount ol the program plus $4.00 (or shipping and 

handling to the address listed below. 

To order by VISA, MASTER- 
CARD or COD 1-800-383-8529 

(Monday thru Saturday, 8am to 5pm PST). 

Cer-Comp Ltd. 
5566 Ricochet Avenue 
Las Vegas, NV 89110 

702-452-0632 



> 



by Joseph Cheek 




Even though I irke OS-9 and enjoy its technical 
aspect'., she rest of my family dislikeditand warned 
it m> be as simple as possible. The)' had trouble 
understanding the concepts of data and execution directo- 
ries, parameter specification, command-line modifiers, 
and so on. Their best efforts to master OS-9 were limited to 
step-by-step instructions for program execution. And they 
Said. '"The system at work has a menu. Alii have to do is 
press a key ." and "Gee. WordPerfect is so easy ! Why can't 
yoursystern be easy'.'"" 1 introduced them to Mutfi-Vue* but 
they had trouble mastering that. too. Finally I decided the 
' solution was a custom, no-fuss, no-hassle raenuins sys- 



J'jscph Check, a high school senior, he gnu using a Cod > 
I nine year.-, ago. He has been programing ever since, an J 
his interests ft an ton arJ effective use of&ASlCW. lie can 
be contact' w.Eutoi Way.Keqrhs.wi Wi!3.iWi) 

9tH8r$&fv ':.'■■. :■■ ' ■■''■■■ '■'■'■ 
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tem lhat would appear when they turned the 
computer on (almost). MS, my menuing 
system, was born. 

MS is easy to use. Press a key and a menu 
appears. Another key press and a program 
executes. No fuss, no hassle, and all pro- 
grams can be run from it. The menuing 
system is easy to set up and modify, and it 
does not rely on the directory system for its 
structure. Programs can be password-pro- 
tected, and the system can be set to prompt 
the user for necessary parameters. 

To use MS, enter Listing 1 and pack it 
with 

pack* /dd/cmds/ms 

Exit BASIC09 and create a directory called 
/dd/SYS/MENUS. Fire up a word processor 
and enter Listing 2. which is a sample menu 
file. Save it in the /dd/sys/menus directory 
under the name main .mnu. From the com- 
mand prompt, type ms #16K and watch the 
menu come up. 

You now have a working menu system. 
However, you cannot do much with it until 
you learn how to create your own menus. 
Menus are created from information in text 
files stored in the /dd/sys/menus direc- 
tory. The initial menu is always the file 
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Figure 1: Screen Types for the /screen Switch 



named ma i n . mn u. The general format of a 
menu file is as follows: 



/title 

/at MM 
Option 1 
/switch 1 
/switch 2 
/switch 3 

Option 2 ; 
/switch 1 
/switch 2 
/etc. 
Option: 3 
/switch 1 
./etc. 




OS-9 Level i 
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Listing 1: ms.b09 

PROCEDURE ms 

0000 CHD "/dd/sys/menus" 

0011 tOOP 

0013 RUN gfx2("dwend") 

0020 RUN gfx2("dwset".2.0.0.80.24.0.1.2) 

0045 RUN gfx2("curoff") 

0053 RUN gfx2("palette".0.63) 

0068 RUN gfx2("color".5.4) 

007B RUN gfx2("erline") 

0089 PRINT " MS-Menuing System vl.0": 

00A6 PRINT " ": 

00C3 PRINT "Written by Joseph Cheek for CSS" 

00E6 RUN gfx2("curxy".0.23) 

00F9 RUN gfx2("erline") 

0107 PRINT " Break or / - previous menu": 

0127 PRINT " ": 

013C PRINT "Arrow keys + ENTER or number selects : 

0165 RUN gfx2("color".0.1) 

0178 RUN domenuC'main.mnu") 

0188 EN0L00P 

PROCEDURE toupper 

0000 PARAM text:STRING[255] 

000C DIM work:STRINGC255] 

0018 DIM ltr:STRING[l] 

0024 DIM c: INTEGER 

002B work-"" 

0032 FOR C-l TO LEN(text) 

0044 ltr-MID$(text.C.l) 

0052 IF ltr>-"a" AND ltr<-"z" THEN 

0067 ltr-CHR»(ASC(ltr)-32) 

0074 ENDIF 

0076 work-work+1 tr 

0082 NEXT c 

008D text-work 

0095 END 

PROCEDURE eko 

B000 PARAM echoon: BOOLEAN 

0007 TYPE optsec-resl:STRING[4]: echo:BYTE: res2:STRING[27] 



Every piece of menu information in the 
file is stored on a line-by-line basis, one 
piece per line. Every line has a slash as the 
first character, except for the actual menu 
options. In other words, lines beginning 
with a slash are considered MS commands. 
Lines without slashes are printed onscreen 
as options the user can select. The first line 
has the /title switch. This line specifies 
the menu title. The second line has the /at 
switch indicating to MS the upper-left coor- 
dinates where the menu should appear on 
the screen. These two switches affect the 
entire menu, all other switches affect only 
the menu option directly preceding them. 

Study Listing 2 carefully. To build your 
own menu, decide on a name for the menu. 
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EVERYONE'S TALCING ABOUT- 
DUAL HI-RES JOYSTICK ADAPTER 
Colorware Hi-Res Tandy Hi + Low 
Res, cassette jack 140 

HI & LO-RES JOYSTICK ADAPTER 
Tandy Hi + Lo-Res 127 

HAWKSoft keyboard cable S25 

DOMINATION war game S18 

MYDOS extended DOS for you! 115 

HAWKSoft 

P.O. Box 7112 Elgin, II 60121 

(708) 742-3084 eves and ends 

SASE for more info and price list. 

S/H ( US & CAN ) always included 

MO. Check C.O.D. no credit cards 

1 year warranty on ALL hardware !! 
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((((((((NEW!)))))))) 

From MillSoft Co. 

MlllSofts' Baseball 
Card Catalog 

by Paul Miller 

NOW YOU CAN PUT ALL YOUR 

Baseball Cards on disk! Requires 
COC03 with two Diskdrives and 
1 28k. It is also available for 1 and 
2 with tape drives. 

To order, please send a check 
or money order to: 
MillSoft Co. • Box 2377 
Amagansett, NY 11930 

$18.95. Please specify which 
System you have. NY Res., 
Please add 7.5% Tax. 



where you want it to appear on the screen, 
and which options it will have. A single 
menu can contain up to nine options. 

The switches tell MS all it needs to know 
about their associated options. For example, 
they tell MS whether a given menu option 
calls up another menu or runs a program, 
what menu or program is to be called, and 
(if it is a program) what type of screen to 
use. All switches pertaining to a certain 
option are found on the lines immediately 
following that option, until another option 
is encountered. So. to make a menu option, 
have a line in the menu file with the name of 
the option on it. List all the switches for that 
option, one to a line. Follow this in a similar 
manner with the remaining menu options. 

Menu Switches 

Here is a list of all the switches MS 
supports, what they mean, and how to use 
them: 

/exec — The /exec switch specifies the 
programtorun.Forexample./exec mvcan- 
vas causes MVCanvas to execute. 

/type — The /type switch specifies 
whether the particular option is used to 
select another menu, execute a program, or 
quit the menu system. If no /type switch is 
used. MS assumes the option calls a pro- 
gram. Example: /type menu or /type quit. 

/pause — This switch tells the system to 
wait for the user to press a key before the 
menu is returned. When used, the current 
screen remains viewable until the user is 
ready to continue. Example: /pause. 



0028 TYPE Regs-cc.a,b,dp:BYTE: x.y.u: INTEGER 

004D DIM ops:optsec 

0056 DIM r:Regs 

005F DIM CCode:BYTE 

0066 CCode-*8D 

006E r.a-0 

0079 r.b-$00 

0085 r.x-AOOR(ops) 

0093 RUN syscall(CCode.r) 

00A2 IF echoon THEN 

00AB ops.echo-1 

00B6 ELSE 

00BA ops.echo-0 

00C5 ENDIF 

00C7 CCode-$8E 

00CF RUN syscall(CCode.r) 

00DE END 

PROCEDURE domenu 

0000 TYPE menutype-name,password:STRING[25]: choicetype:STRING[l 
]: params.pauseatend.chainto:BOOLEAN; screentype:BYTE 
: pa rammsg.executi on. di rectory :STRING[ 50] 

0046 PARAM menufile:STRING[80] 

0052 DIM menu(9):menutype 

0060 DIM Hne:STRING[80] 

006C DIM menutitIe.line2:STRING[25] 

007C DIM key:STRING[l] 

0088 DIM c.cl.maxlen:INTEGER 

0097 DIM path,numberofcho1ces.xpos.ypos.errnum.curc:BYTE 

00B2 DIM exit:B00LEAN 

00B9 ON ERROR GOTO 200 

00BF RUN eko(FALSE) 

00C6 ex1t-FALSE 

00CC curc-1 

0003 xpos-2 

00DA ypos-2 

00E1 menuti tle-"Menu" 

00EC ON ERROR GOTO 100 

00F2 OPEN #path.menufile:REAO 

00FE ON ERROR GOTO 200 

0104 c-0 

010B LOOP 

010D REPEAT 

010F EXITIF E0F(#path) THEN 

0119 exIt-TRUE 

011F ENDEXIT 

0123 READ #path.Hne 

012D UNTIL lineO"" AND ASC(line)<>35 

0140 EXITIF exit THEN 

0149 ENDEXIT 

014D IF ASC(line)-47 THEN 

015A 11ne-RIGHT$(line.LEN(line)-l) 

016A IF SUBSTRt" ".Hne)-0 THEN 

017A I1ne2-line 

0182 ELSE 

0186 line2-LEFT$(line.SUBSTR(" M1ne)-1) 

0199 ENDIF 

019B RUN toupper(line2) 

01A5 line-RIGHT$Uine.LEN(line)-LEN(Hne2)-l) 

01BA IF Iine2-"TITLE" THEN 

01C8 menuti tie-line 

01D3 ENDIF 

01D5 IF Iine2-"AT" THEN 

01E3 xpos-VAL(LEFT$(line.SUBSTR(".".line)-D) 

01 F8 ypos-VAL< RIGHTS! line.LEN(line)-SUBSTR(".". line))) 

020F ENDIF 

0211 IF Hne2-"PASSW0RD" THEN 

0225 menu(c). password-line 

0234 RUN toupperfmenulc). password) 

0244 ENDIF 

0246 IF Iine2-"PARAMS" THEN 

0258 menu(c).params-TRUE 

0265 menu(c) .parammsg-1 ine 

0274 ENDIF 

0276 IF Iine2-"CD" THEN 

0284 menu(c). directory-line 

0293 ENDIF 

0295 IF Hne2-"SCREEN" THEN 

02A7 IF LEFT$(line.2)-"80" THEN 

02B8 menu(c).screentype-2 

02C6 ENDIF 

02C8 IF LEFTS! line.2)-"40" THEN 

02D9 menu(c) .screentype-1 

02E7 ENDIF 

02F.9 IF LEFT$(l1ne.2>-"32" THEN 

02FA menu(c) .screentype-9 

0308 ENDIF 

030A IF LEFT$(line.3)-"640" ANO RIGHT$(1 ine. 1 )-"2" THEN 

0327 menu(c).screentype-5 

0335 ENDIF 
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0337 

THEN 

0354 

0362 

0364 

THEN 

0381 

038F 

0391 

THEN 

03AF 

03BD 

03BF 

03C1 

03D2 

03OF 

03E1 

03F1 

03FB 

040A 

041A 

041C 

042C 

043B 

043D 

0450 

0450 

045F 

0463 

046E 

047A 

047E 

048D 

049B 

04A9 

04B6 

04C3 

04D0 

04DE 

04EC 

04 FA 

0508 

050A 

050E 

0514 

051C 

0528 

0539 

054D 

055C 

055E 

0569 

rofcholc 
0597 

05A0 

05A2 

05B3 

05C6 

05CB 

05E0 

05E5 

05E9 

05EB 

05ED 

05EF 

05FA 

es+2) 

061C 

062F 

063C 

063E 

064F 

0668 

0673 

0677 10 

067C 

0685 

0692 

0696 

06A1 

06AD 

06B5 

06B7 

06BB 

06BD 

06CA 

06CE 

06D9 

06E6 
-06ED 



IF LEFT$(line.3)-"320" AND RIGHTIC1 Ine.l )-"4" 

menu(c).screentype-6 
EN01F 
IF LEFT$(line.3)-"640" AND RIGHTSO 1ne.l)-"4" 

menu(c) .screentype-7 
ENDIF 
IF LEFTS(line.3)-"320" AND RIGHTK 1 ine.2)-"16" 

menu(c).screentype-8 
ENOIF 
ENDIF 
IF 11ne2-"PAUSE" THEN 

raenu(c) .pauseatend-TRUE 
ENDIF 

IF Iine2-"TYPE" THEN 
RUN toupper(line) 
menu(c).cho1cetype-l 1ne 
RUN toupper(menu(c).choicetype) 
ENDIF 
IF I1ne2-"EXEC" THEN 

menu(c) .execution-line 
ENDIF 

IF I1ne2-"N0CHA1N" THEN 
menu(c) .chainto-FALSE 
ENOIF 
ELSE 

c-c+1 
EXITIF c>9 THEN 
ENDEXIT 
menu(c) .name-line 
menu(c).choicetype-"" 
menu(c). password-"" 
menu(c) .pauseatend-FALSE 
menu(c).params-FALSE 
menu(c).chainto-TRUE 
menu(c) .screentype-2 
menu(c) .parammsg-"" 
menu(c) .execution-"" 
menu(c) .directory-"" 
ENDIF 
ENDLOOP 
CLOSE #path 
numberofchoices-c 
maxlen-LEN(menutitle)-5 
FOR c-1 TO numberofchoices 

IF maxlen<LEN(menu(c).name) THEN 

maxl en-LEN( menu (c). name) 
ENDIF 
NEXT c 

RUN gfx2( "onset ".l.xpos.ypos. maxl en+9.numbe 
es+4.1.3) 

PRINT " ": menutitle 

PRINT 

FOR c-1 TO numberofchoices 

IF menu(c).choicetype-"M" THEN 

PRINT "*" 
ELSE IF menu(c).choicetype-"" THEN 
PRINT ">" 
ELSE 

PRINT 
ENDIF 
ENDIF 
NEXT C 
RUN gfx2( "cwarea" . 1 . 1 .maxl en+7 .numberof cholc 

RUN gfx2("color".0.1) 

RUN gfx2("clear") 

PRINT 

FOR c-1 TO numberofchoices 



PRINT " "; c: ". ": menu(c).name 
NEXT c 
GOSUB 1010 
LOOP 

GET #0.key 
IF key-CHR$(12) THEN 
GOSUB 1000 
curc-curc-1 
IF curc-0 THEN 

curc-numberof choices 
ENDIF 

GOSUB 1010 
ENDIF 

IF key-CHRSUB) THEN 
GOSUB 1000 
curc-curc+1 
IF curc>numberofcho1ces THEN 

curc-1 
ENOIF 



SYSTEM IV COMPUTER 
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THE SYSTEM IV is a high performance computer system based on the 
Motorola 68000 microprocessor operating at a clock speed of 16 MHz 
and has been designed to provide maximum flexibility and versatil- 
ity. Mlcroware's Professional OS9/68000 operating system is In- 
cluded with the SYSTEM IV providing an efficient multi-user and 
multi-tasking environment. This provides the user with a PC for home 
use. small business applications and a viable low-cost solution for 
many Industrial control applications (embedded systems). Special 
requirements (such as midi. sound. A-D/D-A. net-working, etc.) are 
easily handled with readily available low-cost PC/XT boards which 
can plug Into the SYSTEM IV expansion slots. And. as user require- 
ments change or improved special function boards become available, 
they may be added or replaced al the user's option. Thus, when soft- 
ware requiring multi-media or other new capability becomes a real- 
ity, the user will be able to add that capabl 1 ity easi ly and have the 
latest technology at his disposal. 

TO ACCESS THE LARGEST SOFTWARE BASE available, an MS-DOS board, the 
ALT86, will be available shortly as a low-cost option. ThiB board 
has a V30 (8086) microprocessor running at 10 MHz, includes 1 Meg of 
0-wait state RAH. uses the Chips and Technology BIOS, has a socket 
for an 8087 math co-processor and plugs into one of the SYSTEM IV 
expansion slots. Additionally, an OS9/6809 software emulator/in- 
terpreter will be available soon. The emulator/ Interpreter will 
permit running most COCO 0S9/6809 software on the SYSTEM IV. 

OTHER OPERATING SYSTEMS may be Installed. These include CPM, 
UNIFLEX, MINIX, STARDOS. REXDOS and most any other operating system 
capable of running on the 66000 microprocessor chip. 

THE DESIGN OF THE SYSTEM IV is derived from previously successful 
designs and uses components that have been tested and proven in other 
systems. SYSTEM IV's uniqueness stems from the ability of Its desig- 
ner and manufacturer. Peripheral Technology, to provide well 
designed, reliable hardware at a low cost. Further, only the func- 
tions necessary to the basic operation have been designed into the 
mother board. Seven PC/XT compatible expansion slots allow an un- 
restricted selection of standard PC/XT accessory boards by the user. 
The user Is not locked into any preconceived notions of what Is best. 

THE MOTHER BOARD is a 4 layer XT size board which holds the micro- 
processor, sockets for up to 4 MBytes of 0-walt state RAM, a battery 
backed-up clock, 4 serial ports, 2 parallel ports, a high density 
(37C65) floppy disk controller. 7 PC/XT compatible expansion slots, 
a memory expansion connector to allow an additional 6 MBytes of 
0-wait state DRAM, keyboard connector and the necessary system sup- 
port chips. 

THE TERMINAL SYSTEM includes the mother board with 1 MByte of on- 
board DRAM, a high density floppy disk drive (3 1/2" or 5 1/4"). 4 
serial port connectors, a parallel printer port connector, a 200 watt 
power supply, mini-PC style case capable of holding 5 half-height 
drives and Professional OS9/68000. This configuration requires the 
use of an external terminal (b). You may use your existing CoCo. 
along with a suitable terminal program, as a terminal. 

THE CONSOLE SYSTEM adds a VGA (800 x 600 x 16 1 graphics board and an AT 
style keyboard and provides full graphics capability at the console. 
Terminals may be added. 

TERMINAL System S 999.00 



CONSOLE System 



SI. 149.00 



THE SYSTEM IV comes with a one (II year parts and labor warranty. 



OPTIONS 

3 MByte additional DRAM 

Hard Disk Controller and driver 

40 MByte Hard Disk 

20 MByte Hard Disk 

Additional 5 1/4" or 3 1/2" HD Floppy Drive 

AT Style keyboard and 800 x 600 x 16 VGA Card 

and driver 
For 1024 x 768 x 256 VGA Card w/1 Meg of Memory 

in place of standard VGA card 
Mono Display Card in place of VGA card 



S120.00 
S 69.00 
S295.00 
S240.00 
S 92.00 

S159.00 



add S170.00 
deduct S 50.00 



Special monitor prices when ordered with the SYSTEM IV. 

rrjtti -st!M 

For i::i. NMKt Nrlpull IlCtaoltfl i: MMM4M 
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Middletown Shopping Center - PO Box 78 - Mlddletown, DE 
302-378-2555 FAX 302-378-2556 
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Submitting 

Material 
To Rainbow 



Contributions to Tin: rainbow are wel- 
come from everyone. We like to run a 
variety of programs that are useful, help- 
ful and fun for other CoCo owners. 

WHAT TO WRITE: We are inter- 
ested in what you want lo tell our read- 
ers. We accept for consideration any- 
thing that is well-written and has a prac- 
tical application for the Tandy Color 
Computer. If it interests you, it will proba- 
bly interest lots of others. However, we 
vastly prefer articles with accompany- 
ing programs that can be entered and 
run. The more unique the idea, the more 
the appeal. We have a continuing need 
for short articles with short listings. These 
are especially appealing to our many 
beginners. 

FORMAT: Program submissions 
must be on tape or disk, and it is best to 
make several saves, at least one of them 
in ASCII format. We're sorry, but we do 
not have time to key in programs and 
debug our typing errors. All programs 
should be supported by some editorial 
commentary explaining how the pro- 
gram works. We also prefer that edito- 
rial copy be included in ASCII format on 
the tape or disk, using any of the word 
processors currently available for the 
Color Computer. Also, please include a 
double-spaced printout of your editorial 
material and program listing. Do not 
send text in all capital letters: use upper- 
and lowercase. 

COMPENSATION: We do pay for 
submissions, based on a number of crite- 
ria. Those wishing remuneration should 
so stale when making submissions. 

For the benefit of those wanting more 
detailed information on making submis- 
sions, please send a self-addressed, 
stamped envelope (SASE) to: Submis- 
sion Guidelines, the rainbow. The Fal- 
soft Building. P.O. Box 385. Prospect, 
KY 40059. We will send you compre- 
hensive guidelines. 

Please do not submit material cur- 
rently submitted to another publication. 



06EF GOSUB 1010 

06F3 ENDIF 

06F5 IF key-"/" OR key-CHRS(8) THEN 

070A 20 RUN gfx2("owend") 

071A END 

071C ENDIF 

071E IF key-CHR$(13) OR key-CHRS(9) THEN 

0733 GOSUB 1020 

0737 ENDIF 

0739 IF key>-"l" AND key<-STR$(nutnberof choices ) THEN 

074F GOSUB 1000 

0753 curc-VAL(key) 

075D GOSUB 1010 

0761 GOSUB 1020 

0765 ENDIF 

0767 ENDLOOP 

076B 100 RUN gfx2("beH") 

077A END 

077C 200 errnum-ERR 

0785 IF errnum-2 OR errnum-3 OR errnum-211 THEN 

079F GOTO 20 

07A3 ENDIF 

07A5 RUN gfx2("owset".1.30.8.20.7,1.3) 

07C7 RUN gfx2("cwarea".1.1.18.5) 

07E1 RUN gfx2("color".0.1) 

07F4 RUN gfx2("clear") 

0801 PRINT " 0S9 Error §"; errnuro 

0815 PRINT 

0817 PRINT " Press any key" 

082A GET #0.key 

0833 RUN gfx2("owend") 

0840 GOTO 10 

0844 PRINT #2."0S9 Error #"; errnum 

085B END 

085D 1000 RUN gfx2("curxy".2.curc) 

0875 RUN gfx2("color".0.1) 

0888 PRINT cure: ". ": menu(curc) .name 

089C RETURN 

089E 1010 RUN gfx2("curxy".2.curc) 

08B6 RUN gfx2("color".5,2) 

08C9 PRINT cure: ". ": menu(curc) .name 

08DD RETURN 

08DF 1020 IF inenu(curc).password<>"" THEN 

08F4 RUN gfx2("owset".1.7.8.66.7.1.5) 

0916 RUN gfx2("cwarea".1.1.64.5) 

0930 RUN gfx2("color".0.1) 

0943 RUN gfx2( "clear") 

0950 PRINT 

0952 PRINT 

0954 PRINT " Password: ": 

0965 RUN gfx2("curon") 

0972 READ #0.1ine 

097B RUN gfx2("curoff") 

0989 RUN toupper(line) 

0993 RUN gfx2("owend") 

09A0 IF HneOmenu(curc). password THEN 

09B3 RETURN 

09B5 ENDIF 

09B7 ENDIF 

09B9 IF menu(curc).choicetype-"M" THEN 

09CC RUN domenu(menu(curc) .executfon+".mnu") 

09E2 ENOIF 

09E4 IF menu(curc).cho1cetype-"Q" THEN 

09F7 RUN gfx2("owset".1.28.8.24.5.1.3) 

0A19 PRINT " Exit MS" 

0A25 RUN gfx2("cwarea".1.1.22.3) 

0A3F RUN gfx2("color".0.1) 

0A52 RUN gfx2("clear") 

0A5F PRINT 

0A61 PRINT " Are you sure [Y/n]?"; 

0A7A GET #0.key 

0A83 RUN toupper(key) 

0A8D IF key<>"N" THEN 

0A9A RUN gfx2("dwend") 

0AA7 RUN gfx2("dwset".2.0.0.80.24.0.1.2) 

0ACC RUN gfx2("palette".0.63) 

0AE1 RUN eko(TRUE) 

0AE8 RUN gfx2("curon") 

0AF5 STOP 

0AF7 ELSE 

0AFB RUN gfx2("owend") 

0B08 ENDIF 

0B0A ENDIF 

0B0C IF menu(curc).directory<>"" THEN 

0B1E CHD menu(curc). directory 

0B29 ENDIF 

0B2B IF menu(curc).choicetype-"" THEN 

0B3D IF menu<curc).params THEN 

0B4C RUN gfx2("owset".1.10.8.60.7.1.3) 

0B6E RUN gfx2("cwarea".1.1.58.5) 
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SYSTEMS ANALYSIS, SOFTWARE ENGINEERING, OR COMPUTER PROGRAMMING 



NRI training assures 

your success in three of today's 
fastest growing computer fields 



These days, success comes to those who 
know how to get the most from a com- 
puter. People who know how to analyze 
systems, design and develop software to 
meet specific needs, program in the 
languages that will get the job done. 

Now NRI has the training you need 
to get a competitive advantage in today's 
rapidly expanding computer world. Choose 
from NRI at-home training in PC Systems 
Analysis, PC Software Engineering Using 
C, or Computer Programming.. .and get 
the computer, the software, and the hands- 
on skills you need for advancement, a new 
career, or a business of your own. 

1 . Learn the art of systems analysis 
and get ahead in today's competitive 
business world 

The name of the game in business today is 
setting up systems that will increase 
efficiency, productivity, and profits — using a 
computer both as the analysis tool and the 
ultimate system solution. 

Now, NRl's new at-home training in 
PC Systems Analysis gives you the com- 
puter, the software, and the analytical skills 
to perform this vital role for any size 
business. 

Step by step, you learn the art of 
systems analysis: how to define and break 
down die problem, interview users, interpret 
and model data, prepare proposals — every 
skill you need to map out the optimal system 
solution. But that's just the beginning. 

Training includes a powerful computer 
system and software you keep 

NRI gives you hands-on experience 
with an AT-compatible computer system — 
complete with 1.2 meg floppy drive, 
monitor, modem, and a full meg of RAM — 
all yours to train with and keep! 

You begin by learning BASIC, today's 
most popular PC programming language. 
Then, using the Microsoft ' Works 
software also included in your training, 
you master four essential PC applica- 
tions: word processing, spreadsheets, 
database management, and data 
communications. 

Soon your computer becomes 
your most important analysis tool, 
allowing you to produce cost- 
benefit analyses, feasibility studies, 
long-range projections, complex 
databases, and more. 

Send today for your free NRI catalog. 
and discover how NRl's new training can 
make you a key player on any business team. 




2. Build your own software as you build 
a money-making career with NRl's 
new training in PC Software 
Engineering Using C 

Jobs in developing custom software will boom 
in the 1990's, according to the Bureau of 
Labor Statistics— up from about 500,000 
positions in 1986 to over 1.2 million by the 
year 2000. Now you can get in on the rapid 
growth of this multibillion dollar industry 
with NRl's new training in PC Software 
Engineering Using C. 

Train with Borland C++" and a 
powerful AT-compatible computer 

Your NRI training gives you hands-on 
experience with a powerful IBM PC/ AT- 
compatible computer system, including 2400 
baud internal modem, 30 meg hard drive, 
VGA color monitor, and advanced program- 
ming software — Borland's Turbo C++. 

You learn software engineering from start 
to finish, mastering each of the essential 
phases involved in developing a full range of 
applications. From analysis to design to 



advanced programming inC, you're in 
command as you assemble the building 
blocks for success as a software engineer. 
Send for your free NRI catalog today! 

3. Begin a high-paying career— even 
a business of your own— in computer 
programming 

Now, with NRI training in Computer 
Programming, you can give computers the 
power to carry out an astonishing range of 
business, professional, and personal 
applications. Because only NRI gives you 
hands-on programming experience with a 
powerful AT-compatible computer, plus 
training in four of today's hottest computer 
languages— BASIC, Pascal, C, and COBOL. 

NRI gives you everything you need to 
succeed in programming, today's top- 
growth computer career field 

Your NRI lessons first guide you step by step 
through the fundamentals, giving you a clear 
understanding of the programming design 
techniques used every day by successful 
micro and mainframe programmers. Then 
the fun really begins. 

With your personal NRI instructor 
always available to help, you use your 
computer and software to actually design, 
code, run, debug, and document programs in 
BASIC, Pascal, C, and COBOL. 

Discover how NRI gives you the exper- 
ience and the know-how, the computer and 
the software to advance on the job or build a 
money-making business of your own in your 
choice of today's top computer fields. Send 
for your free catalog today! 

If the coupon is missing, write to NRI 
Schools, McGraw-Hill Continuing 
Education Center, 4401 Connecticut 
Avenue, NW, Washington, DC 20008. 
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SEND COUPON TODAY FOR FREE NRI CATALOG 



• McGraw-Hill (.Continuing Education Center 

F P ....l„ 4401 Connecticut Avenue, NW *t'i& 

SChOOlS Washington, DC 20008 ftfl| 

YES! Send me the free catalog I've checked and show me how NRI 
can give me the state-of-the-art computer training I need for success. 
/ Check one free catalog only Other computer career training: 

u PC Systems Analysis 

□ PC Software Engineering Using C 

□ Computer Programming 

Name 



□ Microcomputer Servicing 

□ Desktop Publishing and Design 

□ Word Processing Home Business 



Age. 



•m 



Address . 



L_ 



City 



State . 



.Zip. 



*_uy ~ * — 

Accredited Member. National Home Study Council 4548-041 | 



/pa rams — If this switch is used, the 
user is asked to enter parameters for the 
program. If any text is found after the 
/pa rams switch in the menu file, it is dis- 
played when the parameters are requested. 
Examples: /params, or /params enter 
filename to edit. 




/password — Programs may be pass- 
word-protected with this switch. The user 
must type the password correctly to pro- 
ceed. Example: /password coco3. 

/screen — This specifies the type of 
screen to be used when executing a pro- 
gram. Possible screen types are shown in 
Figure 1 . If your system has a / v 1 window 
descriptor, the 32-by-lfi screen type is sup- 
ported. If no /screen switch is used, an 80- 
by-24 screen size is assumed. Examples: 
/screen 80-by-24. /screen 40-by-24 
and /screen 32-by-16. 

/cd — The /cd switch is used to specify 
a new directory in the event the software 
requires it ( some software must be run from 
specific directories, or perhaps you already 
have your programs set up to run from 
specific directories). Example: /cd /dd/ 
mydir. 

/nochain — The /nochaln switch is 
used to tell MS not to have the shell chain to 
the specified program, but instead just fork 
(run) it. Normally, the shell is called to 
chain to a program by using the ex com- 
mand because this saves memory. Some- 
times, however, this is not possible or not 
wise, and using this switch disables the 
chaining feature for the particular program. 
Example: /nochaln. 

Menu Considerations 

Make sure the menu has room to fit on 
the screen. Using a menu that does not fit 
causes MS to crash. If necessary, move it to 
the left or higher on the screen. 

When setting up a menu, the name of the 
menu becomes the /exec parameter, but 



0B88 


RUN gfx2("color".0.1) 




0B9B 


RUN gfx2("clear") 




0BA8 


PRINT 


«» 


0BAA 


IF menu(curc) .parammsg-"" THEN 




0BBC 


PRINT " Enter Parameters:" 




0BD2 


ELSE 




0BD6 


PRINT " ": menu(curc). parammsg: ":'* 




0BE9 


ENDIF 




0BEB 


PRINT 




0BED 


PRINT " -3": 




0BF4 


RUN eko(TRUE) 




0BFB 


RUN gfx2("curon") 




0C08 


READ #0.1ine 




0C11 


RUN gfx2("curoff"> 




0C1F 


line-" "+line 




0C2B 


RUN eko( FALSE) 




0C32 


RUN gfx2("owend") 




0C3F 


ELSE 




0C43 


line-"" 




0C4A 


ENDIF 




0C4C 


IF menu(curc) .chainto THEN 




0C5B 


RUN executeC'ex "-t-menu(curc) .execut1on+l 1ne.menu(cu 




re) .paus 


eatend 

.menu (cure) .screen type) 




0C8A 


ELSE 




0C8E 


RUN execute(menu(curc).execution+line.menu(curc).pauseatend 
.menu (cure) .screen type) 




0CB7 


ENDIF 




0CB9 


ENDIF 




0CBB 


IF menu(curc).directory<>"" THEN 




0CCO 


CHD "/dd/sys/menus" 




0CDE 


ENDIF 




0CE0 


RETURN 




PROCEDURE 


help 




0000 


RUN gfx2("curon") 




000D 


RUN eko(TRUE) 




PROCEDURE 


execute 




0000 


TYPE regs-cc.a.b.dp:BYTE: x.y.u: INTEGER 




0025 


PARAM execstr:STRING[80]: pauseatend:B00LEAN 




0037 


PARAM screentype:BYTE 




003E 


DIM r:regs 




0047 


DIM key:STRING[l] 




0053 


DIM path.oldpath.errnum.xmax:BYTE 




0066 


errnum-0 




006D 


IF screentype-9 THEN 




0079 


OPEN #path."/vl":UPDATE 




0087 


ELSE 




008B 


OPEN //path, "/w": UPDATE 




0098 


IF screentype-1 OR screentype-6 OR screentype-8 THEN 




00B2 


xmax-40 




00B9 


ENDIF 




00BB 


IF screentype-2 OR screentype-5 OR screentype-7 THEN 




00D5 


xmax-80 




00DC 


ENDIF 




00DE 


RUN gfx2(path."dwset".screentype.0,0.xmax.24,0.1.2) 




010C 


RUN gfx2(path, "palette". 0.63) 




0126 


ENDIF 




0128 


xmax-0 




012F 


PUT //path.xmax 




0139 


RUN gfx2(path. "select") 




014C 


r.a-0 




0157 


RUN syscall($82.r) 




0165 


oldpath-r.a 




0170 


CLOSE //0.//1.//2 




017D 


r .a-path 




0189 


RUN syscall(J82.r) 




0197 


RUN syscall($82.r) 




01A5 


RUN syscall($82.r) 




01B3 


ON ERROR GOTO 10 




01B9 


SHELL execstr 




018E 10 


errnum-ERR 




01C7 


ON ERROR 




01CA 


RUN gfx2("curoff") 




01D8 


IF pauseatend AND errnum-0 THEN 




01E8 


PRINT "<-MS 1.0-Hit any key->"; 




0206 


GET #0.key 




020F 


ENDIF 




0211 


close lie. in. n 




021E 


IF screentype<>9 THEN 




022A 


RUN gfx2(path."dwend") 




023C 


ENDIF 




023E 


r .a-oldpath 




024A 


RUN syscall($82.r) 




0258 


RUN syscall($82.r) , 




0266 


RUN syscall($82.r) 




0274 


CLOSE //path 




027A 


RUN gfx2("select") 




0288 


RUN eko(FALSE) 
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028F IF errnumOB THEN 

029B RUN gfx2("owset".1.30,8.20.7.1.3) 

028D RUN gfx2("cwarea". 1.1.18, 5) 

02D7 RUN gfx2("color".0.1) 

02EA RUN gfx2< "clear") 

02F7 PRINT 

02F9 PRINT " 0S9 Error f"; errnum 

030D PRINT 

030F PRINT " Press any key ; 

0323 GET (M.key 

032C RUN gfx2("owend") 

0339 ENDIF 

033B END 



Listing 2: main.mnu 

/title Main Menu 
/at 2.2 
Appl ications 
/exec apps 
/type menu 
Games 

/exec games 
/type menu 
System Utilities 
/exec sutils 
/type menu 
Shell 

/exec shell 
Quit 
/type quit 




the .mnu extension should not be included. 
For example. 

My Personal Menu 
/exec mymenu 
/type menu 

uses the menu in the file mymenu . mnu when 
the My Personal Menu option is chosen. 

To select an option, press its number, or 
use the up and down arrow keys to move the 
highlight bar over the choice and press 
ENTER. To move back a level (to the previ- 
ous menu), press BREAK (or SHIFT-BREAK 
or CTRL-BREAK) or the slash key. The right 
arrow also serves as an ENTER key, and the 
left arrow functions as a slash. 

MS also supports password protection 
for menus and the /type quit switch. 

MS should be run with at least 16K. Using 
8K. the default, allows it to have only a few 
menus on the screen at one time. 

To have Mi" execute automatically on 
boot-up, place the following line at the end 
of your startup file: ms #16K. Or, use 
cmdgen to create the following script: runb 
ms #16K. Call the script autoexec and place 
it in your execution directory. 

I hope you enjoy MS. and that it will help 
your family, too, better appreciate the power 
of your CoCo. ^ 




3BBurfc« & S&urk« 

P.O. Box 733 
Maple Valley. WA 98038 



U.S. ORDER DESK: 
(800) 237-2409 



INTV& TECHNICAL: 
(206)432-1814 



0S9 Software (* >= 256K; ** >= 512K required): 

CYBERVOICE (Software only)* -- Run your S/S SuperVoice w/ OS9! 

FILE SYSTEM REPACK -- Popular disk defragmenter. 

FILE RECOVERY SYSTEM -• helps rebuild crashed disks 

R. S. B.* - Real Disk BASIC for Level 2 (BASIC ROM required). 

EZGEN 1.09 -- Bootfile editor. NEW VERSION! 

PERTASCII* -- Multi-user scrambled letter word game. 

WILD & MV -- Wildcard & move directory entry utilities. 



$24.95 
$29.95 
$24.95 
$39.95 
$19.95 
$19.95 
$19.95 




BRSIC Software (* >= 256K; ** >- 512K required): 

HYPER-I/O -- 16K Hard disk / big floppy BASIC. B&B or DISTO $29.95 
DAGGORPATCH -- Disk patch for Dungeons of Daggorath. $ 9.95 

HYPER-I/O comes on Poppy disk i is EPROMable. HYPER-I/O allows large floppy and hard disk 
directories, with good Ml compatibility. We recommend HYPER-I/O lor BBS & BASIC use. but 
it may be incompatible with some ol your commercial ML S/W. 

Affordable Color Computer Hardware: 

CYBERVOICE -- Speech Synthesizer w/ OS9 software. 
COCO XT - Adapts PC hard drives to CoCo. OS9 S/W included. 
COCO XT-RTC -- CoCo XT, with battery backed real-time clock. 
XT-ROM -- Boots OS9 from B&B hard disk automatically. 



$99.95 
$69.95 
$99.95 
$19.95 



News About Upcoming Products... 

Wave got a lot ol new products under development right now. both lor the Color Computers and lor 
the new OS9-68000 machines. A lew ol the products you can expect lo see over the next lew 
months are a DIALOG BOX MANAGER lor OSaOSK, the PIXELBOX adapter that lets you use LogiTech 
ScanMan handheld scanners with the CoCo 3. and OSK ports ol several popular Burke & Burke uUUly 
packages. Slop by our booth at the Chicago Rainbowlesl lor the latest newsl - Chris Burke 



CyberUolce speaks well 

for 0S9I 

We've mated a high-tech SC-02 
speech synthesizer with an 
entirely new kind ot OS9 device 
driver that actually lets you 
specify your own pronunciation 
rules. You can even use escape 
sequences to control the style and 
pilch ot the voice - male, female, 
high, low, fast, slow - billions of 
combinations. Advanced features 
like insiantaneous inflection 
conlrol produce high-quality 
speech! CyberVoice is compatible 
with the Speech Systems 
SuperVoice - buy H/W & S/W, 
or just the CyberVoice soltware. 




WA RESIDENTS ADD 8.2% SALES TAxN 

• . U.S. COD'S add $3.75. Min. U.S. I 
1 shipping $4.00. Min. shipping to Canada i 
1 $5.00. Please allow 2 weeks lor delivery, i 
1 Overnight or 2-day delivery available lor i 
' In-stock Items. Soltware upgrades $5.00 i 

* each w/recelpl, Including U.S. shipping./ 
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CoCo 
Consultations 



Modem Upgrades 



by Marty Goodman 

Contributing Editor 



£k Can I convert a 100-bps IK Modem 
^R Pak to operate at 1200 or 2400 bps by 
some simple operation, such as replacing 
the crystal connected to the 74HC943 modem 
chip? 

Dale War dell (Nil OR) 
Millinocket. Massachusetts 

A No, you cannot. Speed is not the only 
difference between 300-, 1200- and 
2400-bps modem circuits ■ — the entire 
method of encoding data is different. It is 
simply impossible to turn any 300-bps 
modem into a 1200- or 2400-bps modem by 
any means shon of literally building an 
entirely new modem. However . . . 

In the past I urged folks to literally throw 
out the DC Modem Paks they had pur- 
chased. But I got tired of telling unhappy DC 
Modem Pak owners this, so I decided to do 
something about the problem. I have devel- 
oped a way of altering the Pak (by removing 
the modem portion) so it functions as an RS- 
232 Pak. The method will be published in an 
upcoming issue of THE RAINBOW along with 
information about having the upgrade per- 
formed by a third party. Of course, once the 
DC Modem Pak has been converted, you'll 
still need a 1200-bps or higher external 
modem. You'll also need a Multi-Pak Inter- 
face. Slot Pak or a Y cable to use the new 



Martin H. Goodman, M.D.. a physician 
trained in anesthesiology, is a longtime 
electronics tinkerer and outspoken com- 
mentator — sort of the Howard Cose 1 1 of 
the CoCo world. On Delphi, Marty is the 
SIGop of rainbow's CoCo SIG and database 
manager ofos-9 Online. His non-computer 
passions include running, mountaineering 
and outdoor photography. Marty lives in 
San Pablo, California. 



pack with your terminal program and disk 
drives. 

Printers and Word Processors 

£^ \l\ DMP 107 printer does not seem to 
^^^ print correctly in some type styles 
using DeskMate. What other printers in the 
$200 to SS00 range do you recommend? 
What other CoCo word processors in the 
t5Q i" S 1 50 range do you recommend? 

Brian Spano 
Center Marches, New York 

A The Panasonic KX-PH24 is an 
excellent 24-pin (very high quality, 
NLQ) printer. It is fully compatible with 
EPSON print codes and can be purchased 
new for under $300. 1 highly recommend it. 
Any other 24-pin printer in this price range 
would be good, too. Note that used Hewl- 
ett-Packard DeskJet printers can be found 
in the S300 to S400 range. You might con- 
sider one of these. I use Telewriter SO as my 
text editor. Many prefer the better features 
(though poorer screen display) of Telewriter 
128. vip software users prefer either VIP 
Writer III or the less expensive and feature- 
packed Simply Better. Others like 
Microcom's Word Power 32 for its ability 
to handle columns and a large file size. 

Adding Drives 

^tk How can I use an old, full-height TRS 
^BJ so Disk Drive as Drive I with my FD- 
502 disk drive system as Drive 0? 

George Pindell 
Baltimore. Maty land 

A You would have to make, or order, a 
custom cable to hook the FD-502 con- 
troller to both the FD-502 and the other drive. 
You'd also have to make sure the jumpers 
on the other drive are set to make it think it 



is Drive 1. These settings depend on the 
brand of drive used. Then, you must deter- 
mine if the FD-502 uses a terminator resistor. 
If so, remove the terminator resistor from 
the other drive. If not. put a terminator 
resistor in the other drive. I wrote an article 
on interfacing disk drives to the CoCo that 
covered topics like this in a bit more detail 
(March and April 1990). 

Fried 68B09E 

^Kk My lovely 3-year-old daughter un- 
^mt, plugged the disk controller from my 
CoCo 3 while it was on. The CoCo now 
appears to work all right for the first few 
moments, but then it goes crazy as soon as 
any key is touched. Any suggestions? 

Dan Van Hoy (NV7L) 
Naselle. Washington 

A Your best bet is to assume the 68B09E 
processor chip is fried. Desolder it, 
install a socket and replace the chip. This 
should cure the problem. If you have access 
to other CoCo 3s. test the memory and the 
GIME chip from your CoCo 3 in them (they 
are all socketed and easily tested). The 
GIME chip occasionally gets zapped in this 
situation and. even more rare, memory chips 
or the P1A gets zapped. But by far the most 
common scenario is the 6809 getting burned. 

Hyperactive Drives 

£k I have a Tandy FD-502 disk drive 
^R system that is behaving erratically. 
Sometimes the drive lights come on of their 
own accord or a directory is scrambled. 
This problem occurs with lite system plugged 
into either my old (AK CoCo 2 or my CoCo 
3. Any ideas as to what is wrong? 

Christine Megens 

Fergus, Ontario 

Canada 
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A Any number of things could be wrong. 
Some testing is probably in order. 
First, clean the edge connector on the disk 
controller. Use a pencil eraser to make both 
sides of the 40-pin connector bright and 
shiny. Does that fix the problem? Next, take 
your disk controller and drives to a friend, 
or a Radio Shack, and try your controller in 
a different system. Does the problem ap- 
pear? If so. you have a bad controller. Next, 
try their controller with your physical disk 
drives and cable. Does the problem appear? 
If so. the problem is either in your cable, the 
result of a bad drive or a result of improper 
drive termination. Note that defective 7406 
(or 7416) chips in the controller could cause 
your problem. 

Composite Video, To Go 

^^ / have a PBJ W ordPak . an am ienlSi 
^R column device for the CoCo I and 2. 

I'd like to know if it can be used to help me 
get monochrome composite video output 
from mv CoCo. 

Kevin Bogus (KEVINBOGGS) 
Statesville. North Carolina 

A The PBJ so-column card is a complex 
video generator with on-board RAM 
and video-display hardware. Only about 
two or three of its transistors were used to 



create and output the NTSC composite-video 
signal. The circuit used there would not 
work, in any case, with the Motorola vdg 
chip in the CoCo. However, it's easy to get 
excellent composite-monochrome video out 
of a CoCo 1 or 2. I produced and sold for 
years a circuit to do this. If you are design- 
ing your own circuit, you have to realize 
that the Y output on the 6847 VDG chip is 
nearly a proper composite-monochrome 
video signal, except it is inverted. My little 
circuit uses three transistors; an emitter 
follower on the input, then an inverting 
amplifier followed by a final amplifier. I 
also used an extra resistor and capacitor to 
"peak" the circuit and sharpen the image. I 
still have a few of those circuit boards and 
kits for that video driver. If you are inter- 
ested, write me in care of THE RAINBOW. 
Some CoCo vendors may still be selling 
video drivers for the CoCo 1 and 2. but 
supply of those is running out I would think. 

Portable CoCo 

£^ / am in the process of putting a CoCo 
^mt 3 into a portable case and using a 
battery power supply. I have successfully 
licked the problem of providing regulated 
+5 volts for the main circuit. +10 volts for 
one half of the RS-232 converters, and the 
zero-crossing and voltage-comparator cir- 



cuits. But I need a way to get -in volts for the 
other half of those circuits. Can you suggest 
a solution'.' 

CarlJ.Boll(CBJ) 
Chicago. Illinois 

A Two solutions come to mind. The 
most effective solution is to get a 
modular DC-to-DC inverter that takes +5 
volts as input and provides a - 1 2- volt output. 
I have a couple of such items, made by 
ASTEC (the same folks who made the in- 
verter blob used in the Tandy RS-232 Pak 
that lakes +5 volts and puts out 12 volts). 
Another, less elegant, approach is to simply 
use a 9-volt transistor radio battery for the 
negative voltage. Current drain on that line 
is very low, so the 9-volt battery would 
probably last for a number of hours. I would 
recommend the former approach, though, 
as the best alternative. The problem is get- 
ting tin a quantity of one) the inverters — 
they are not commonly offered at local 
electronic supply houses. However, they 
are commonly found at surplus shops and 
amateur-radio swap meets. 

Quick Change Monitor Switch 
£k I have ordered an wu/. but have 
^R Only one analog KGB monitor to use 
with both wry CoCo 3 and my MMH when it 




LVrO / the ever popular music editor that lets you compose music on a graphics music staff with a 

mouse, is on sale for only S20! And this includes the 100 page Lyra Companion which is packed with 

useful information and examples. 

Lyra can be used to play music on any MIDI synthesizer or through your TV or monitor speaker. 

You don't need an expensive interface; just a simple cable you can easily make (or order for S10) 

is all that is needed. You can easily modify the supplied music files to create room filling 

sound from your synthesizer. Or even make it sound like a 8 piece band playing! Transcribing 

from sheet music is easy; you don't need to be a musician. If you own a CoCo (any version 

with at least 64K memory), you can't afford to pass up this opportunity. There arc only 100 

copies of this sale package left, so get it while you can! 

CoCO N\\ D I PrO is a complete 16 track MIDI recording studio. Imagine a multi-track 

tape recorder with all the features you could wish, including CD quality reproduction, ability to bounce 

tracks, over dub tracks, and punch in and out. CoCo MIDI Pro gives you all of that plus a lot more! Since ii 

records digital data coming from your MIDI synthesizer, it plays back exactly what it records, including every 

liming nuance. And then every liltle detail can be edited to perfect the recording. You can easily add tempo and 

volume changes, even smooth changes from soft to loud or slow to fast. And while the sale lasts, you also get a 

conversion program thai converts Lyra files so CoCo MIDI Pro can read them, a S10 value, free! A CoCo 3 with 512K memory and a 

Multi-Pak or Y-cable is required. Through the end of April, it is on sale for only S100. This includes the program, a comprehensive 

manual, and a hardware MIDI interface lhat provides high speed MIDI in and out. 

And don't forget our other goodies-collections of music for Lyra (Streidfs Classics and Lyra Lybrary Classics each comprising 2 disks 

S20.00 each), and CoCo MIDI (2 disks of genuine piano roll music, S20.00). those hard to find Y cables (S25.00). Hot CoCo, the 50 

minute tape of electronic music (S7.00), and PC-Lyra, the IBM PC version of Lyra (S35.00 for CoCo version owners). 

Ordering information: Payment by money order, check, or credit card (Visa or Mastercard) is welcome. Please include S3.00 for 

shipping on all orders. Most orders arc shipped within 24 hours. 



$100! 



t 



MusicWare 

Hamlet Route 1261 
Seaside, OR 97138 



1-800-321-1490 (orders only, please!) 
1-503-738-01 19 (inquiries) 
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ii/rives. How might I go about building a 
switch box for my monitor to switch it 
between the two computers? 

Brian Wright (POLTERGEIST) 
Chicago, Illinois 

A Your best bet is to purchase a generic . 
two-position DB- l > switch box. These 
are available from most PC-clone vendors. 
Rogers Specialists (805-251-0520) sells such 
a device (Pan Number DS-092) lor Six. plus 
shipping. All you need to do is make appro- 
priate cables to go between the CoCo. the 
MM/l. the monitor and the DB-° female 
connectors on the switch box. Tandy sells 
DB-9 connectors and hoods. If you contact 
me via Delphi or THE RAINBOW, I can get 
you the needed 10-pin. crimp-on connectors 
used for the CoCo's RGB port. I suggest you 
use flat ribbon cable wherever possible, and 
surround each active signal line (R.G. B. 
Hsync. Vsync) with Ground lines. This 
process involves a little rescrambling when 
you solder the wires to the connectors. In 
the case of the 1 0-pin. CoCo RGB connector. 
I usually crimp that to flat ribbon cable. 
Then, after six inches of cable, shred that 
cable and solder it to another cable in a 
fashion that surrounds every active signal 
with ground wires. For standard CoCo RGB. 
this requires an 1 1 -conductor ribbon cable 



GRANITE COMPUTER SYSTEMS 

MODEMS 

NEW PRICE 2400 Baud V.42/V.42bis data modems. MNP1-5/LAPM. 

Error correction and dala compression (much higher effective 

throughput — as much as 9600 Baud). External $1 B9 (+$7 S&H). 

NEW PRODUCT 9600 Baud Send/Receive Fax modems. 

Send/Receive text/graphics files fromAo your computer/any 

Fax machine in the world. Full 2400 Baud data modem capability. 

Includes software. External $1 49/lnternal $1 39 (+$5 S&H) 

NEW PRICE 9600 Baud ScndFax modems. 

Send text/graphics files from your computer to any Fax machine 

in the world. Full 2400 Baud data modem capability. 

Includes software. External $129/lnterrwl $119 (t$S S&H). 

NEW PRICE 2400 Baud Data modems 

External $109/lntcrnal $99 (+$S S&H). 
These arc all high quality modems made by Zoom Telephonies in the USA. 
Fully Hayes compatible. Two year mfg warranty. Software available. 
S&H Canada (Air PP and Ins) V.42/v.42bis $1 2.00 Sendfax/Data S8.00 

GCS FILE TRANSFER UTILITIES — Version 3.0 

The CCS File Transfer Utilities provide a simple and quick method to transfer 
lext/binary files fromAo a variety of (loppy disk formats. /^^v 

Commands pc, RS, FLEX disks: Dir, Dump, Read, Write rainbow 

PC disks: Rename, Delete, Format 

Handles most 5.25 and 3.5 formats. Any level sub-directories (PC). 

Binary Files. Use pipes for multiple file transfers. Multi-Vuc version 

can be used under Mulli-Vue or as stand alone Shell commands. 

Requires OS-9 L2 for COCO 3, LI for COCO 1 or 2. 2 drives (one can be 

hard/ramdisk, one floppy 40 T DD DS). Multi-Vuc for Multi-Vue version. 

SDISK3 for COC03 - SDISK for COCO 1 or 2. 

Multi-Vuc version $54.95 Standard version $44.9S 
V3.0 updates (provide disk number) $1 5.00 

D.P. Johnson Software SDISK or SDISK3 $29.95 LI +L2 Ulils $75.00 

Shipping and handlling — any software $2.00 
Orders must be prepaid or COD. VISA/MC accepted. COD is additional. 

571 Center Road, Hillsboro, NH 03244 USA 
(603) 464-3850 



(if you want ground on both edges as well as 
between all five active lines). This approach 
results in a cleaner video image in cases 
where there is more than about five feet of 
cabling involved — the every-other-line- 
to-ground sort of flat cables behave almost 
as if they were composed of separate coax- 
ial cables on each active line. 

Speaking of Monitors 

^^ I foolishly pin some speakers on my 
^Ct color monitor, and now the effect of 
those strong magnets near the picture tube 
has resulted in a discolored part of the 
image when I use the monitor. I guess my 
monitor doesn't do its own degaussing! 
How can I fix this problem? 

Scott Corley < scorn) 
Clairton. Pennsylvania 

A Your monitor probably does its own 
degaussing (to some extent) but was 
not up to the amount of magnetizing of the 
tube's innards that you accomplished with 
those strong speaker magnets. I recom- 
mend you get a cassette-tape or video-tape 
bulk eraser. Turn the eraser on a couple of 
feet from the picture tube and slowly bring 
it closer to the tube. Once it is against the 
tube, move the eraser around with a wiping 
motion over the area of the surface of the 
tube that is affected. 
After about 30 sec- 
onds, slowly remove 
the eraser from the 
picture tube before 
turning it off. I once 
found this approach 
to work with a color 
monitor I had "dis- 
colored" by resting 
another operating 
color monitor on top 
of it, influencing it 
with its magnetic 
field. You may not 
be able to totally cure 
the problem imme- 
diately, but it should 
improve a lot. The 
set's own demagneti- 
zation will then likely 
take over and com- 
pletely cure the dis- 
coloration after a 
while. 
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Multi-Pak Up- 
grade 

£k I just bought 
^CT 2b- 

3024 Multi-Pak Inter- 
face. Is this the one 
that requires a $15 



upgrade consisting of replacing a socketted 
PAL chip? Should I strap the 'CART interrupt 
pins on the Multi-Pak? 

Francis Swygert (DSRTfOX) 
Warner Robins, Georgia 

A Yes, the older 26-3024 Multi-Pak is 
upgraded by replacing a 20-pin, 
socketted PAL chip with a new PAL chip. If 
you will not be using autostart ROM packs in 
ihis Multi-Pak. and especially if you intend 
to use the MPi with an OS-9 system, it is 
desirable to strap the *CART interrupts on 
the unit. This consists of shorting Pin 8 on 
each of the four slots together and tying 
them to Pin 8 on the edge connector that 
plugs into the CoCo. You may want to 
remove the pull-up resistors connected to 
Pin 8 on two or three of the 40-pin slots. 

Direct-Drive Serial Ports 

£k I'm working on a project iluii in- 
^R wives hooking the input and output 
pins of a 6551 ACIA (like that used in the RS- 
232 Pak) directly to another device without 
running them through TTL to RS-232 level 
converters. How long a cable can I use for 
the ITL-levet. serial signals generated by 
the 655/ chip? 

Lonnie McClure (LMCCLURE) 
Chattanooga. Tennessee 

A This question is similar to that of 
"how far can I run a parallel printer 
cable?" If anything. I would think the sig- 
nals from the 6551 at TTL (0/5-volt) levels 
might go a little further than in a parallel 
printer cable because they are not carrying 
as much data as fast. Based on this line of 
reasoning, I am rather confident that you 
could use a cable of up to six feet without 
problems and you might find you could 
take the signals 12 feet, or more, and still 
have a reliable system. For increased relia- 
bility at even greater lengths. 1 suggest 
using large-gauge (22 or bigger) wires in the 
cable. Note that the TTL-level signals com- 
ing out of the 6551 chip are inverted with 
respect to the usual signal levels (-12 to +12 
volt) expected for RS-232. 

I Can't Hear a Thing 

£k Recently, I found I could not get 
^BL audio through my CoCo 3 RGB port, 
but the audio was available from the RCA 
phono connector on the back of the CoCo. 
How should I proceed to find the problem 

and fix it? 

Ted Jaeger (TEDJAEGER) 
Fayetteville. North Carolina 

A Pin 7 of the RGB port should be con- 
nected direct ly to the center pin of the 
RCA phono jack for audio. Apparently, this 
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connection has been severed for some rea- 
son, perhaps due to a cold solder joint 
where Pin 7 of the RGB port is connected. Or 
perhaps the pad for Pin 7 has cracked from 
repeated plugging and unplugging of an 
RGB connector. This situation could also be 
caused by a hairline crack or break in the 
traces on the board. 

1 would confirm that there is no continu- 
ity between Pin 7 of the video connector 
and the center of the audio connector. Use 
an ohmmeter set on the RX10 scale. 

If you get ohms resistance between Pin 
7 of the RGB connector and the center con- 
ductor of the audio jack, the problem is not 
in your CoCo at all. but rather in the cable 
for your monitor, or in the amplifier or 
speaker of the monitor. Perhaps the 10-pin 
connector is now making flaky contact with 
the cable due to tugging during insertion 
and removal. This can be fixed by recrimp- 
ing the connector, or by removing the con- 
nector and crimping on a new one. 

If the ohmetergoes to infinity (no conti- 
nuity) between Pin 7 of the RGB connector 
and the center of the audio jack, run a 
jumper wire between Pin 7 of the RGB 
connector and the center of the audio con- 
nector. If you want to trace things, note that 
the sound output comes from the negative 
(minus) side of C56 (a U>-uF. 25-volt electro- 



lytic cap), whose positive side is fed by the 
collector of transistor Q4. Q4 and C56 are 
located near the audio-output connector. 
There's also a .022-uF capacitor going from 
the final audio output to ground. This is C57, 
which acts as a high-frequency filter. 

Halted by a Cable 

^fe / have a problem using a No-Halt 
^d. controller when my Multi-Pak Inter 
face is separatedfrom my CoCo by 30 cm of 
40-coiuhtctor ribbon cable. What is wrong? 
Maarten (AMJ) Van Wamelen 
Oedelem, Belgium 

A Even very short lengths of ribbon 
cable between the CoCo and the 
Multi-Pak Interface can cause subtle prob- 
lems. The cause is probably capacitance in 
the ribbon cable. I recommend not using 
ribbon cable at all, or using a very short 
ribbon cable (3 cm or less). Why are you 
using that ribbon cable? To better make 
room for the CoCo system on your desk? If 
so, let me suggest a better solution that 
results in a more reliable machine. Put the 
CoCo. with the MPI plugged directly into it. 
off to one side or above or below your main 
work area. Buy either a Bob Puppo-style 
IBM keyboard adapter from Frank Hogg 
Laboratories, or a "Marty Goodman" key- 



board-extender cable from Microcom. Ei- 
ther allows you to have most of your system 
away from the desktop and still have the 
keyboard comfortably in your lap or on 
your desk. Extending the keyboard through 
a ribbon cable does not cause the same 
reliability problems as extending the fragile 
40-conductor, high-speed main bus of the 
computer. 



V our technical questions are wel- 
comed. Please address them to Cot o 
Consultations, the RAINBOW, i*. 0. Box 
385, Prospect, ky mm. 

We reserve the right to publish 
only questions of general interest and 
to edit for brevity and clarity. Due to 
the large volume of mail we receive, 
we are unable to answer letters indi- 
vidually. 

Questions can also he sent to 
Marty through the Delphi CoCoSIG. 
From the CoCo 8J«> prompt, pick 
Rainbow Magazine Services. Then 
at the r UMnnv> prompt . type ASK 
(for Ask the Experts) to arrive at 
the K\i'KRTS> 

prompt , where you can select the 
"t'ot'n Consultations" on line form, 
which has complete instructions. 



JWT Enterprises 



Attention! MMJ. programmers wanted. Many prospective 
projects already planned, Writ? for more information. 



Optimize Utility Set 1 NEW! 

Optimize your disks by eliminating fragmented files and compacting your 
directories for faster file access. Also Includes a utility to assess file fragmenta- 
tion and dlrcctoiy fragmentaUon as well as excess directory padding. 

Optimize Utility Set 1 $29.95 Foreign postage, add S3.00 



Nine-Times: Each issue contains: 9 helpful and useful programs to help 
build your OS-9 library • Instructions, examples, and samples of Baslc09 
procedures and subroutines to help with your own programs and your 
understanding of Baslc09 • C programs and programming examples • Hints, 
Help columns, and Informative articles to advance your knowledge of OS-9 • 
Supplied totally of 5.25" disk • Bound manual sent to each new subscriber for 
help in getting Nine-Times up and running, as well as tips on using It with a ram 
disk or hard disk • All graphic/Joystick Interface for ease of use. 



1-Year Subs, $34.95 

Art_-4»-«-__U-« aut-lui-na ««-l 



Canadian postage, add $1.00 
Foreign postage, add $7.00 



Back Issues: Available for the May 1 989 through March 1991 Issues. Please 
write for informabon on Back Issue contents. 

Back Issue, ea. $7.00 Foreign postage, add $1.50 ea. 



Maga/jne Source: Due to many Inquiries, the source code for the 
maOBdne graphic shell Is being provided as an Informational tool. Included Is 
the actual Baslc09 source code and complied modules on disk, as well as 
documentation and a printed copy of the source code. 

Source, $24.95 Foreign postage, add $3.00 



To order, please send u.s. JWT Enterprises 

check or money order to: _____ ,_ j 01..J 

5755 Lockwood Blvd. 

Youngstown, OH 44512 



^ 



Technical Assistance: 
(2161-758-7694 



RAINBOW 

CCMIflCA 1*0*1 
MAI 

Sony, no C.O.D.. or credit csnis: Foreign » Cain— an order .. please use -.8. _o..r std-r ■. 
U.S. checks, allow 3-4 weeks for receipt of first Issue/back Issue. 

C-l,.MOJ~l M-l I. . .,.,—,. .1 «,.,■.—. »," — C.„. .... «_.,.!.. I". 



Free Disk-ZAP with any purchase! 
VIP Software for the CoCo 3 

VIP Writer III includes VIP Speller $79.95 

VIP Calc III $69.95 

VIP Database III $69.95 

VIP Library /WDCE $179.95 

Upgrade Writer to Writer III $49.95 

Upgrade Calc to Calc III $29.95 

Upgrade Database to Database III.. ..$39.95 
Upgrade Library to Library /WDCE.. ..$99.95 

VIP Software for ALL CoCos 

VIP Writer includes VIP Speller $69.95 

VIP Calc $59.95 

VIP Database $49.95 

VIP Disk-Zap $29.95 

VIP Integrated Library $149.95 

Upgrade any VIP pgm to VIP Library $99.95 



Upgrading? Send disk only + amount + S/H 
See January '90 ad for product descriptions. 

VISA M/C 

SD Enterprises info line (805) 566-1317 

P. O. Box 621 Carpinteria Ca 93013 

VIP Library orders add $4 S/H USA, $5 Canada & $10 Foreign 

Other orders add $3 S/H in USA, $4 Canada, $6 Foreign. COD orders add an 
additional $275. Checks allow 3 weeks for delivery. Calif, res. add 6 1 » % lax. 
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CoCo 3 returns to 
the classics 




Tic-Tac 




by David Ridings 



Tic-Tac is a computerized ver- 
sion of the classic game Tic- 
Tac-Toe. The competition is 
not with another person, but 
with a computer-generated 
opponent and an onscreen Cat. (For those 
unfamiliar with the rules of Tic-Tac-Toe, 
any games not won by you or your oppo- 
nent are automatically scored in favor of the 
Cat.) Competition is tough as you try to 
outwit the computer's strategy. But beating 
your inanimate opponents is not as easy as 
it sounds. Tic-Tac requires more than just 
casual participation; it demands careful 
planning to ensure victory. 

The program requires a CoCo 3. To get 
it going, plug a joystick into the right joy- 
stick port and enter RUITTIC-TAC". The 
players appear onscreen with the game- 
board. Press the joystick button to turn on a 
spotlight and start the game. The computer 
chooses which player begins the game. To 
make a move, press the number that corre- 
sponds to the desired square on the board. 
Press the joystick button to enter your se- 
lection and place the X on the board. If you 

David Ridings spends his spare time writ- 
ing CoCo software for his son. Dan, who 
has cerebral pals}'. Through running these 
programs, Dan gains a sense of pride in 
showing others what he can do. David can 
be contacted at 3058 Donnycave, Maryland 
Heights, MO 63043.(314)291-2854. 



change your mind after pressing the num- 
ber, press the space bar and enter another 
number. The program records the number 
of games won by each player during com- 



petition. The first player to win 10 games is 
the champion. 

I hope Tic-Tac finds a good home in 
your software library. □ 



CoCo 3 
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125 160 452 188 

211 212 492 219 

235 184 543 31 
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The Listing: TIC-TAC 



•TIC-TAC 

•WRITTEN BY DAVID RIDINGS 
•COPYRIGHT (C) MARCH 1991 
'BY FALSOFT. INC. 
•RAINBOW MAGAZINE 

11 G0SUB911 

12 PC-7:NC-3:BC-11:G0SUB926 
15 X$-"BM-X:.-Y;" 

17 HBUFF1.99:HBUFF2.999:HBUFF3.9 
99:HBUFF4.2999 

21 TT$-"D110BR40U110D35R40L120BD 
40R120" 

22 TA$-"C12R89D4L89U4C8":TB$="C1 
2R4D84L4U84C8":TC$-"C12BL2BD2E69 



F3G69H3C8":TD$-"C12BR1F69G3H69E3 

C8" 

31 HLINE(3.44)-(316.48).PSET.B:H 

PAINT(4.46).BC.8 

33 HLINE(100.3)-(104.44).PSET.B: 
HPAINT( 101.5 ).BC. 8 :HLINE( 206,3) - 
(210.44).PSET.B:HPAINT(207.5).BC 
.8 

34 A--55:B-22:FORD-1TO3:A-A+104: 
HLINE(A.B)-(A+9.B+4).PSET.B:HPAI 
NT(A+1.B+1).BC.8:NEXTD 

35 X-28:Y=18:GOSUB830 

36 X-235:Y-19:G0SUB812 

37 X-129:Y-18:G0SUB831 
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38 HPAINTC5.5) . 10 . 8 : HPAI NT( 109 . 5 
).10.8:HPAINT(214.5) .10.8 

40 X-79:Y-18:G0SUB829:X-183:Y-18 

:G0SUB829:X-287:Y=18:G0SUB829 

43 HCIRCLE(11.37).4:HCIRCLE(112. 

37). 4 

45 HLINE(176.55)-(310.180).PSET. 

B:HPAINT(7.52).14.8 

47 A-135:B-44 

48 F0RD-1T08:B-B+16:G0SUB95:NEXT 
D 

49 B=44:A-A-16:IF A<18 THEN61 

50 G0T048 

61 HC0L0R14:HLINE(5.51)-(31.75). 
PSET.BF:HC0L0R8 

62 HDRAWBM22.65D7F2R2E2U12H2L2G 
2D5U3L12G2D4F2R12L5BU8U13L1D13" 

63 HPAINT(21.65).8.8:HPAINT(23.6 
5), 3. 8 

65 HCOLOR12:HLINE(20.163)-(115.1 
79).PSET.B:HC0L0R11:HLINE(21.164 
)-(114.178).PSET.B:HC0L0R12:HLIN 
E(22.165)- (113.177 ).PSET.B:HPA IN 
T(55.170).10.12:HCOLOR8 

66 HPRINT(3.21)."TIC-TAC-T0E" 
91 GOSUB922:GOTO101 

95 HCIRCLE(A.B).6:HPAINT(A.B).ll 

,8:RETURN 

101 HPAINT(23.65).1.8 

103 HC0L0R1:HLINE(26.61)-(169.58 
).PSET:HLINE(169.58)-(169.111).P 
SET:HLINE( 169. Ill)- (26.70). PSET: 

HC0L0R8 

104 HPAINT(43.67).0.1:GOSUB121:G 

OT0125 

121 HC0L0R11:X-223:Y-61:HDRAWX$+ 

TT$ : X-224 : Y-63 : HDRAWXS+TT$ : HCOLO 

Rl : X-225 : Y-62 : HDRAWX$+TT$ : HCOLO 

R8:RETURN 

125 X-Z42 : Y-l 1 2 : G0SUB8Z9 : X-201 : Y 

-77 : G0SUB833 : X-284 : Y-157 : G0SUB83 

3 

127 HGET(188.62)-(218.93).2:HGET 

(228.102)-(258.133).3 

128 HC0L0R4:HLINE(188.62)-(218.9 
3), PSET. BF:HLINE( 228. 102) -(258.1 
33).PSET.BF:HLINE(268.142)-(298. 
173).PSET.BF:HCOL0R8:G0SUB129:G0 

TO202 

129 HPRINT(25.9)."1 2 3":H 
PRINT(25.14)."4 5 6":HPRIN 
T(25.19)."7 8 9" -.RETURN 

133 X-202:Y-158:HDRAWX$+TC$ 

134 G0T0134 

202 HPAINT(11.37).10.8:HPAINT(11 
2.37).10.8:R-RNO(2):ON R GOTO 21 
1.261 

211 HPAINT(11.37) . 3 . 8: At-INKEYS 

212 IF A$>CHR$(48)AND A$<CHR$(58 
)THEN221 

213 G0SUB851 

214 HPAINTdl .37) .10.8 

215 G0SUB851 

216 GOT0211 

221 IF A$-CHR$(49)THEN G0SUB311 

222 IF A$-CHRS(50)THEN G0SUB321 

223 IF A$-CHR$(51)THEN G0SUB331 

224 IF A$-CHR$(52)THEN G0SUB341 

225 IF A$-CHR$(53)THEN GOSUB351 

226 IF A$-CHRS(54)THEN GOSUB361 

227 IF A$-CHR$(55)THEN GOSUB371 

228 IF A$-CHR$(56)THEN G0SUB381 

229 IF A$-CHR$(57)THEN G0SUB391 
235 G0SUB918:G0SUB711:IF T-9 THE 
N731 

237 HPAINTdl. 37). 10. 8 



239 G0T0261 

261 F0RF-1T01:HPAINT(112.37).3.8 

262 F0RP-1T03:G0SUB851:NEXTP 

264 HPAINT(112.37) .10.8 

265 F0RP-1T03:G0SUB851:NEXTP 

266 HPAINTC112.37) .3.8 

267 NEXTF 

271 R-RND(9):G0SUB861 

272 ON R G0SUB411.421.431.441.45 
1.461.471.481.491 

275 G0SUB918:G0SUB711: IF T-9 THE 

N731 

277 HPAINTU12.37) .10.8 

298 GOT02U 

299 G0T0299 

311 IF L(l)-1 THEN 211 

312 N(1)-24:N(2)-9:N(3)-1:G0SUB3 
97 

313 L(1)-1:A(1)-1:T-T+1 

314 HPUT(188.62)-(218.93).2 

315 RETURN 

321 IF L(2)-l THEN 211 

322 N(1)-29:N(2)-9:N(3)-2:G0SUB3 
97 

323 L(2)-1:A(2)-1:T-T+1 

324 HPUT(228.62)-(258.93).2 

325 RETURN 

331 IF L(3)-l THEN211 

332 N(l)-34:N(2)-9:N(3)-3:GOSUB3 
97 

333 L(3)-1:A(3)-1:T-T+1 

334 HPUT(268.62)-(298.93).2 

335 RETURN 

341 IF L(4)-l THEN211 

342 N(1)-24:N(2)-14:N(3)-4:G0SUB 
397 

343 L(4)-1:A(4)-1:T-T+1 

344 HPUT(188.102)-(218.133).2 

345 RETURN 

351 IF L(5)-l THEN211 

352 N(1)-29:N(2)-14:N(3)-5:G0SUB 
397 

353 L(5)-1:A(5)-1:T-T+1 

354 HPUT(228.102)-(258.133).2 

355 RETURN 

361 IF L(6)-l THEM211 

362 N(1)-34:N(2)-14:N(3)-6:G0SUB 

397 

363 L(6)-1:A(6)-1:T-T+1 

364 HPUT(268.102)-(298.133).2 

365 RETURN 

371 IF L(7)-l THEN211 

372 N(1)-24:N(2)-19:N(3)-7:G0SUB 
397 

373 L(7)-1:A(7)-1:T-T+1 

374 HPUT(188.142)-(218.173).2 

375 RETURN 

381 IF L(8)-l THEN211 

382 N(1)-29:N(2)-19:N(3)-8:G0SUB 
397 

383 L(8)-1:A(8)-1:T-T+1 

384 HPUT(228.142)-(258.173).2 

385 RETURN 

391 IF L(9)-l THEN211 

392 N(1)-34:N(2)-19:N(3)-9:G0SUB 
397 

393 L(9)-1:A(9)-1:T-T+1 

394 HPUT(268.142)-(298.173).2 

395 RETURN 

397 HC0L0R4:HPRINT(N(1).N(2)).N( 
3):F0RD-1T029:IF BUTTON(0)-1 THE 
N HC0L0R8: RETURN 

398 B$-INKEY$: IF B$-CHR$(32)THEN 
HC0L0R8:HPRINT(N(1).N(2)).N(3): 

GOT0211 

399 NEXTD:HC0L0R8:HPRINT(N(1),N( 



2)).N(3):F0RF-1T049:NEXTF:G0T039 
7 

411 IF L(l)-1 THEN 271 

412 L(1)=1:A(1)-2:T-T+1 

413 HPUT(188.62)-(218.93).3 
419 RETURN 

421 IF L(2)-l THEN271 

422 L(2)-1:A(2)-2:T-T+1 

423 HPUT(228.62)-(258.93).3 
429 RETURN 

431 IF L(3)-l THEN 271 

432 L(3)-1:A(3)-2:T-T+1 

433 HPUT(268.62)-(298.93).3 
439 RETURN 

441 IF L(4)-l THEN 271 

442 L(4)-1:A(4)-2:T-T+1 

443 HPUT(188.102)-(218.133).3 
449 RETURN 

451 IF L(5)-l THEN 271 

452 L(5)-1:A(5)-2:T-T+1 

453 HPUT(228.102)-(258.133).3 
459 RETURN 

461 IF L(6)-l THEN 271 

462 L(6)-1:A(6)-2:T-T+1 

463 HPUT(268.102)-(298.133).3 
469 RETURN 

471 IF L(7)-l THEN 271 

472 L(7)-1:A(7)-2:T-T+1 

473 HPUT(188.142)-(218.173).3 
479 RETURN 

481 IF L(8)-l THEN 271 

482 L(8)-1:A(8)-2:T-T+1 

483 HPUT(228.142)-(258.173).3 
489 RETURN 

491 IF L(9)-l THEN 271 

492 L(9)-1:A(9)-2:T-T+1 

493 HPUT(268.142)-(298.173).3 
499 RETURN 

511 HGET(3.3)-(100.44).4 

512 HPUT(193.75)-(290,116),4 
515 G0T0541 

521 HGET(104.3)-(206.44).4 

522 HPUT(193.75)-(295.116).4 
525 G0T0541 

531 HGET(210.3)-(316.44).4 

532 HPUT(193.75)-(299.116).4 
535 G0T0541 

541 HPRINT(25.16)."W INNER" 

542 GOSUB917 

543 FORF-1TO29:PALETTE0.49:FORP- 
1TO49:NEXTP:PALETTE0.62:FORP-1TO 
49:NEXTP.F 

544 FORZ-1TO4:HBUFF(Z)-0:NEXTZ 

545 SA-0:SB-0:SC-0:GOTO1 
551 GOT0551 

611 SA-SA+1:HCOLOR10:HLINE(64.8) 
-(96.38).PSET.BF:HC0L0R8:X-79:Y- 
18: IF SA-10THENGOSUB811:GOTO651 

612 IF SA-9THENG0SUB828:G0T0651 

613 IF SA-1THEN G0SUB816:G0T0651 

614 IF SA-2THENG0SUB818:G0T0651 

615 IF SA-3THENGOSUB820:GOTO651 

616 IF SA-4THENG0SUB822:G0T0651 

617 IF SA-5THENG0SUB824:G0T0651 

618 IF SA-6THENG0SUB825:G0T0651 

619 IF SA-7THENG0SUB826:G0T0651 

620 IF SA-8THENG0SUB827:G0T0651 

621 SB-SB+1:HCOLOR10:HLINE(168.8 
) - ( 200 . 38 ) . PSET . BF : HC0L0R8 : X-183 
:Y-18: IF SB-10THENGOSUB811 :G0T06 

61 

622 IF SB-9THENG0SUB828:G0T0661 

623 IF SB-1THENG0SUB816:G0T0661 

624 IF SB-2THENG0SUB818:G0T0661 

625 IF SB-3THENGOSUB820:GOTO661 

626 IF SB-4THENG0SUB822:G0T0661 
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627 IF SB-5THENG0SUB824:G0T0661 

628 IF SB=6THENG0SUB825:G0T0661 

629 IF SB-7THENG0SUB826:G0T0661 

630 IF SB-8THENG0SUB827:G0T0661 

631 SC-SC+1:HCOLOR10:HLINE(272.8 
)- (304.38 ).PSET.BF:HC0L0R8 

632 X-287:Y-18 

633 IF SC-1THENG0SUB816:G0T0671 

634 IF SC-2THENG0SUB818:G0T0671 

635 IF SC-3THENGOSUB820:GOTO671 

636 IF SC-4THENG0SUB822:G0T0671 

637 IF SO5THENG0SUB824:G0T0671 

638 IF SC-6THENG0SUB825:G0T0671 

639 IF SC-7THENG0SUB826:G0T0671 

640 IF SC-8THENG0SUB827:G0T0671 

641 IF SO9THENG0SUB828.-G0T0671 

642 IF SC-10THENGOSUB811:GOTO671 

651 "WIN-DAN 

652 F0RD-1T03:G0SUB917:NEXTD 

653 G0T0681 

661 "WIN-COMP 

662 G0SUB917:F0RD-1T03:G0SUB921: 
NEXTD 

663 G0T0681 

671 'WIN-CAT 

672 G0SUB917:F0RD-1T09:G0SUB918: 
NEXTD 

673 G0T0681 

681 FORF-1TO19:PALETTE0.49:FORP- 
1TO49:NEXTP:PALETTE0.62:FORP-1TO 
49:NEXTP.F 

682 HCOLOR4:HLINE(178.57)-(308.1 
78).PSET.BF:HC0L0R8 

691 FORQ-1TO9:A(Q)-0:L(Q)-0:NEXT 
Q:T-0 

693 IF SA-10THEN511 

694 IF SB-10THEN521 

695 IF SC-10THEN531 
697 G0SUB121:G0SUB129 
699 GOTO202 

711 IF A(l)-2 AND A(1)-A(2)AND A 
(1)-A(3)THEN X-198:Y-75:TL$-TA$: 
GOT0751 

712 IF A(l)-2 AND A(1)-A(4)AND A 
(1)-A(7)THEN X-201:Y-75:TL$-TB$: 
GOT0751 

713 IF A(l)-2 AND A(1)-A(5)AND A 
(1)-A(9)THEN X-209:Y-81:TL$-TD$: 
GOT0751 

714 IF A(2)-2 AND A(2)-A(5)AND A 
(2)-A(8)THEN X-241 :Y-75:TL$-TB$ : 
GOT0751 

715 IF A(3)-2 AND A(3)-A(6)AND A 
(3)-A(9)THEN X-281 :Y-75:TL$-TB$ : 
G0T0751 

716 IF A(3)-2 AND A(3)=A(5)AND A 
(3)-A(7)THEN X-209 : Y-149:TL$=TC$ 
:G0T0751 

717 IF A(4)-2 AND A(4)=A(5)AND A 
(4)-A(6)THEN X-198: Y=115:TL$-TA$ 
:G0T0751 

718 IF A(7)-2 AND A(7)-A(8)AND A 
(7)-A(9)THEN X-198: Y-155:TL$-TA$ 
:G0T0751 

721 IF A(l)-1 AND A(2)-l AND A(3 
)-l THEN X-198:Y-75:TL$-TA$:G0T0 
771 

722 IF A(l)-1 AND A(4)-l AND A(7 
)-l THEN X-201:Y-75:TL$-TB$:GOTO 
771 

723 IF A(l)-1 AND A(5)-l AND A(9 
)-l THEN X-209:Y-81:TL$-TD$:GOTO 
771 

724 IF A(2)-l AND A(5)-l AND A(8 
)-l THEN X-241 :Y-75:TL$-TB$: GOTO 
771 



725 IF A(3)-l AND A(6)-l AND A(9 
)-l THEN X-281:Y-75:TL$-TB$:G0T0 
771 

726 IF A(3)-l AND A(5)-l AND A(7 
)-l THEN X-209:Y-149:TL$-TC$:GOT 
0771 

727 IF A(4)-l AND A(5)-l AND A(6 
)-l THEN X-198:Y-115:TL$-TA$:G0T 
0771 

728 IF A(7)-l AND A(8)=l AND A(9 
)-l THEN X-198:Y-155:TLS«TAS:G0T 
0771 

729 RETURN 
731 G0T0631 

751 HDRAWX$+TL$:HPAINT(X+1,Y+1). 

0.12:GOTO621 

771 HDRAWX$+TL$:HPAINT(X+1.Y+1). 

0.12:GOTO611 

811 X-X-11:Y-Y-5:TN$-"D20R5U20L5 
BR12G3D14F3R9E3U14H3L9BD4BR3G101 
0F1R3E1U10H1L3":HDRAWXS+TN*:HPAI 
NT(X+1.Y+1),NC.8:HPAINT(X+12.Y+1 
).NC.8:XA$-" TEN":RETURN 

812 X-X+12:Y-Y+2:CT$-"BL1E2U8G6H 
3L7G3H6D8F2D7F7R6E7U7":HDRAW X$+ 
CT$ 

813 HCIRCLE(X-16.Y).3...6:HCIRCL 
E(X-8.Y).3...6:HCIRCLE(X-12.Y+4) 
.3...8:HCIRCLE(X-12.Y+9).5,..4 

814 HLINE(X-6.Y+3)-(X+4,Y+3).PSE 
T:HLINE(X-6.Y+6)-(X+l.Y+10).PSET 
:HLINE(X-18.Y+3)-(X-24.Y+3).PSET 
:HLINE(X-18.Y+6)-(X-24.Y+10).PSE 
T 

815 HPAINT(X-1.Y-1).15.8:XB$-" C 
AT": RETURN 

816 X-X-3:Y-Y-2:0E$-"D16L4D3R14U 
3L4U20L9D3R2" 

817 HDRAW X$+0E$:HPAINT(X+2.Y).N 
C.8:XB$-" ONE":RETURN 

818 X=X-10:Y-Y-1:TW$-"U3E3R13F3D 
8G3L11D4R9U2R5D6L19U9E3R10E1U4H1 
L7G1D2L5" 

819 HDRAW X$+TW$:HPAINT(X+l.Y-2) 
,NC,8:XB$- M TWO":RETURN 

820 X-X-10:Y-Y-1 :TH$="U3E3R13F3D 
6G2F2D6G3L13H3U4R5D2F1R6E1U3H1L6 
U4R6E1U3H1L6G1D2L5U2": HDRAW X$+T 
H$:HPAINT(X+2.Y).NC.8 

821 XB$-"THREE": RETURN 

822 X-X+5 : Y-Y - 7 : F0S-"D1 1R5D5L5D7 
L5U7L11U5E11R5L5BD8D4L5E5" 

823 HDRAW X$+F0$ :HPAINT(X-1 . Y+l ) 
.NC.8:XB$-" FOUR":RETURN 

824 X-X-9:Y-Y-6:FI$-"R17D5L12D3R 
9F3D7G3L14U5R11E1U1H1L11U12 ,, :HDR 
AW X$+FIS:HPAINT(X+2.Y+2).NC.8:X 
B$-" FIVE": RETURN 

825 X-X+9:Y-Y-1:SX$-"U3H3L11G3D1 
6F3R11E3U7H3L9U3E1R5F1D1R5BD6BL6 
L5G1D2F1R5E1U2H1": HDRAW X$+SX$:H 
PAINT(X-2.Y-2).NC.8:XB$-" S I X " : R 
ETURN 

826 X-X-9:SV$-"U6R20D5G9D8L6U9E9 
L9D2L5":HDRAWX$+SV$:HPAINT(X+2.Y 
-2) t NC.8:XB$-"SEVEN": RETURN 

827 X-X-7 :Y-Y+5: E 1 $="H2U6 E3R14F3 
D6G2F2D6G3L14H3U6E2BR5BU3H1U2E1R 
6F1D2G1L6BD5G1D2F1R6E1U2H1L6":HD 
RAWX$+EI$:HPAINT(X+2.Y).NC.8:XB$ 
-"EIGHT":RETURN 

828 X-X-7 : Y-Y+l 1 : N I $-"D3F3Rl 1 E3U 
15H3LUG3D6F3R9D3G1L6U2L5BU6BR6R 
5E1U2H1L5G1D2F1":HDRAWX$+NI$:HPA 
INT(X+2.Y+1).NC.8:XB$-" NINE": RE 
TURN 



829 X-X-5:Y-Y-5:ZE$-"G3D14F3R12E 
3U14H3L12BD4BR3G1D10F1R6E1U10H1L 
6":HDRAWX$+ZE$:HPAINT(X+2.Y+1).N- 
C. 8 :XA$-"ZERO": RETURN 

830 HCIRCLE(X.Y+5).12:HCIRCLE(X. 
Y -4). 13. 13. .3:HPAINT(X.Y-4).12,1 
3:HCIRCLE(X.Y-4).13.8. .3:HA$-"C8 
BL5BD2R2D2L2U2BR8R2D2L2U2BD4BL2L 
2D2R2U2BR4BD2D1G3L4H3U1BL8U5BR26 
D5" : HDRAWX$+HA$ : XC$-"HAPPY" : RETU 
RN 

831 HCIRCLE(X.Y+5).13:HCIRCLE(X- 
5.Y+4).6...5:HCIRCLE(X+5.Y+4).6. 
..5:HPAINT(X.Y-3).8.8:VI$-"BD10B 
L1U2R2D2L2BD2L2G1E1R6F1L8BL5BU9U 
12D1H1F2BR16E2G1U1D12U12F1H2BL16 
G2":HDRAWX$+VI$ 

832 RETURN 

833 CX$-"G9R6E5F5R6H9E9L6G5H5L6F 
9":HDRAWX$+CX$:HPAINT(X+1.Y).3.8 
: RETURN 

851 C-RND(155):C-C+9:D-RND<130): 
D-D+57:CC-RND(15):HGET(C-4.D-4)- 
(C+4.D+4).1:HCIRCLE(C.D).2.CC:HP 
UT(C-4.D-4)-(C+4.D+4).l: RETURN 

861 G-1:H-2:J-3:G0SUB895 

862 G-1:H-4:J-7:G0SUB895 

863 G-1:H-5:J-9:G0SUB895 

864 G-2:H-3:J-1:G0SUB895 

865 G-2:H=5:J=8:G0SUB895 

866 G-3:H-1:J-2:G0SUB895 

867 G-3:H-5:J-7:G0SUB895 

868 G-3:H-6:J-9:G0SUB895 

869 G-4:H-7:J-1:G0SUB895 

870 G-4:H-5:J-6:G0SUB895 

871 G-5:H-6:J-4:G0SUB895 

872 G-5:H-9:J-1:G0SUB895 

873 G-5:H-8:J=2:G0SUB895 

874 G-5:H-7:J-3:G0SUB895 

875 G-6:H=9:J-3:G0SUB895 

876 G-6:H-4:J-5:G0SUB895 

877 G=7:H=8:J-9:G0SUB895 

878 G-7:H=1:J-7:G0SUB895 

879 G-7:H-3:J-5:G0SUB895 

880 G-8:H-9:J-7:G0SUB895 

881 G-8:H-2:J-5:G0SUB895 

882 G-9:H-1:J-5:G0SUB895 

883 G-9:H-7:J-8:G0SUB895 

884 G-9:H-3:J-6:G0SUB895 

885 G-1:H-7:J-4:G0SUB895 
887 RETURN 

895 IF T-8 AND A(R)-0 THEN 272 

896 IF A(G)-1 AND A(H)-1 AND A(J 
)-0 THEN R-J 

897 IF A(G)-2 AND A(H)-2 AND A(J 
)-0 THEN R-J:G0T0272 

899 RETURN 

911 ON BRK GOTO 916 

912 PALETTE RGB:HSCREEN2 :HCLS4 :H 
COLOR8:POKE65497.0:PALETTE0.62:P 
ALETTE10. 49 : PALETTE1 1,14: PALETTE 
12.2:PALETTE13.4:PALETTE14.7:PAL 
ETTE15.52:RETURN 

916 PALETTE RGB:END 

917 PLAY"O1T160CDEFGABO2CDEFGABO 
3CDEFGAB04CDEFGAB" : RETURN 

918 PLAY"O2T160CDEFGAB":RETURN 

919 F0RT-151T0141 STEP-1 :SOUNDT, 
1:NEXTT:S0UND41.9:RETURN 

921 PLAY"O1T160CDEFGABO1CDEFGABO 
1CDEFGAB01CDEFGAB": RETURN 

922 IF BUTTON(0)-1 THEN RETURN 

923 G0T0922 

925 RETURN 

926 HLINE(3.3)-(316.188).PSET.B: 
HPAINT(1.1).BC.8:RETURN 
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Graphics Demo 16K Extended 



Freedom 

By Richard Estrado 

Freedom is a graphics program that 
creates a snake of lines that move ran- 
domly around the screen, much like the 
arcade game QLx. CoCo 1 and 2 users 
need to change Line 80 to POKE 65495 . 0. 
If your CoCo doesn't support the high- 
speed mode, leave Line 80 out altogether. 
After pressing BREAK to stop the pro- 
gram, make sure you set the computer 
back to normal speed using POKE 65496.0 
(or POKE 65494.0 for the CoCo I and 2). 
Explore and enjoy! 

The Listing: FREEDOM 

1 'FREEDOM 

2 "WRITTEN BY RICHARD ESTRADO 

3 "COPYRIGHT (C) APRIL 1991 

4 "BY FALS0FT. INC. 

5 'RAINBOW MAGAZINE 

10 ********************* 

20 "* FREEDOM * 
30 "* * 

40 "* by R. ESTRADO * 
eg ********************* 

60 " 

70 • OMMIT LINE 80 FOR CO 

C01.C0C02 

80 POKE 65497.0 

90 " INITIALIZE 



100 DIM R(20).P(20).Q(20).S<20) 

110 PM0DE 4.1 :SCREEN 1.1:PCLS 

120 P(0)=128:Q(0)-100:R(0)-128:S 

(0)=100 

130 P-l:PP-2 

140 " MAIN PROGRAM 

150 A-RND(0)*2-1:B-RND(0)*2-1:C- 

RND(0)*2-1:D=RND(0)*2-1 

160 A-A*5:B-B*5:C-C*5:D-D*5 

170 FOR X-l TO 15+RND(20) 

180 G0SUB 290 

190 IF P-20 G0SUB 350 

200 IF ABS(P(P)-R(P))>50 THEN A- 

-A:C— C 

210 IF ABS(Q(P)-S(P))>40 THEN B- 

-B:0— D 

220 LINE (P(PP).Q(PP))-(R(PP).S( 

PP)). PRESET 

230 LINE (P(P).Q(P))-(R(P).S(P)> 

,PSET 

240 P=P+1:IF P-21 THEN P-l 

250 PP-PP+1 : IF PP=21 THEN PP-1 

260 NEXT X 

270 GOTO 140 

280 ' CHECK BOUNDARIES 

290 P(P)-P(P-1)+A:IF P(P)>250 OR 

P(P)<5 THEN A— A:P(P)-P(P)+A 
300 0(P)=Q(P-1)+B: IF Q(P)>192 OR 

Q(P)<5 THEN B— B:Q(P)-Q(P)+B 
310 R(P)-R(P-1)+C:IF R(P)>250 OR 

R(P)<5 THEN C— C:R(P)-R(P)+C 
320 S(P)=S(P-1)+D:IF S(P)>250 OR 



S(P)<5 THEN 0— D:S(P)-S(P)+D 
330 RETURN 

340 " LINK ARRAY 
350 P(0)-P(20):Q(0)-Q(20):R(0)-R 
(20):S(0)=S(20) 
360 RETURN 




Choose From 4 GREAT Money Sa ving Pa ckagesl 



# 



01STQ 

SC-II 

+ 

4in1 



1 



2 



0ISTD 
sc-n 

+ 

1-MEG 



0ISTD 
sc-n 

+ 

51 2K 



u I 

3 



4 



□ ISTQ 

4in1 



1-MEG 



( $200 ) ( $235 J C $165 ) C $235 ) 



■ SC-II $130 
•SC-I $99 

■ MC-I $75 



•OKSR-3 $30 

• 512K $70 

• 1-MEG Kit $150 



■ RTC $35 
• 3in1 $70 
■4in1 $130 



■ MPROM $50 

■ H. DISK $50 
> RS-232 $40 



■1-MEG (OK) $140 

■ RS-232 PAK $55 

■ HD & RS-232 $60 



(CRC Inc. 



11 Boul. Des Laurentides, Laval, Quebec, Canada H7G 2S3 
Include S&H of $8 MC/VISA or Money Order Accepted 



Turn ol the Screw Book $20 
(With any Special Package $10) 
• Project Board $10 

1-514-967-0195 

Sorry: No personal cheques 
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Delphi 
Bureau 



Conference 



by Eddie Kuns 

OS-9 SIG Database Manager 



Last month I explained the basic 
slash commands, such as /SENO 
and /TIME. Now you're ready for 
some of the more specialized com- 
mands. Conference has a number 
of special slash commands that only apply 
while you are in that area, and several new 
slash commands have been added recently. 
First, let's review how to enter and use 
Conference. You can enter Conference from 
any SIG menu, or from the Delphi Main 
menu by entering CO. The Conference area 
in each SIG is different, except that the 
CoCo and OS-9 SIGs share a Conference 
area, as do some other SIGs. This means if 
you want to talk to someone, you should be 
in the same SIG. There are exceptions, but 
this is the general rule. 




When you enter Conference, you see the 
Conference> prompt. You are now "idle" 
in Conference, which means you have not 
yet entered a Conference group. (Groups 
are user-definable areas within Conference. 
Delphi allows several separate groups of 
people to talk with each other in each 
Conference area.) There are several com- 
mands you can use in idle, but you can 'l talk 
to anyone yet. The first command 1 usually 
enter at this prompt is /NAME Eddie. This 
slash command gives me a handle, or nick- 
name, which lasts for as long as I am in 
Conference or until I use the command 

Eddie Kuns is pursuing a PhD in physics at 
Rutgers University. He lives in Aurora. II- 
liiinis and works as a programmer and 
researcher ai Fermilah. Eddie is co-man- 
ager of the CoCo SIG: his usemame is 
EDDIEKUNS. 



again. Now. if you enter the /WHO com- 
mand, you see something like 

GROUP LIST: 02:05:46 
13) SCRAMBLE Word Game 

GAME. Jim 
20) Late Night Chat 

Joel . Bob K. Rick 

- idle 

Eddie 
AVAILABLE LIST: () - in conf 

MYCROFTH. (EDDIEKUNS). 

(JOELHEGBERG). (JIMISSEL). 

(BOBKEMPER). (GAME). 

DANMONDAY. JAHICKS. 

(RICKADAMS) 
[8 in thi s area] 

This is similar to the normal (outside 
Conference) /WHO slash command, but gives 
you more information. For example, people 
are listed by their handles, if they have set 
one. The members of the different groups in 
this Conference area are also listed. You 
can belong to more than one group at a time, 
but that's a topic for later discussion — it 
can get really confusing! 

In the above listing, you see two groups 
in Conference: scramble Word Game and 
Late Night Chat. If you want to join an 
existing group, enter 

J01 H groupname 

When 1 joined Late Night Chat by entering 
JOIN late, my arrival in the group was 
announced with 

** .Eddie just joined "Late Nigh 
t Chat" (4 members now) ** 

Notice that you need only type enough 
of the group name to make it unique. Also. 



my name has a period before it in the 
announcement. The period is Delphi's way 
of telling you the name is a handle and not 
an actual Delphi username. Another way to 
join a group is to enter 

JOIN group/lumber 

using the group number shown by /WHO. 

Once you have entered a group, any- 
thing you type (except a slash command) is 
sent to everyone in the group when you 
press ENTER. And you see everything en- 
tered by everyone else in the group. A short 
bit of discussion may look like: 

.J1m> THAT doesn't happen often. 

.R1ck> yes it does! 

.Randy> Me too. I have pretty we 

11 ruled out electrical interfer 

ence. 

RICKADAMS>> it's a thought. 

.Joel> Crashed again, but I thin 

k the modpatch worked. 

Whew! 

.Eddie> Whew! 

.Joel> I just got an Invalid mod 

patch command at the end, but I 

think it's 

.Joel> just a blank line. 

** .Steve just joined "Chat" (6 

members now) ** 

Remember last month when I covered 
/SEND? Look carefully. A regular Confer- 
ence message has the sender's name (or 
handle) followed by a single greater-than 
sign (>). A message sent to you with /SEND 
has the person's Delphi username followed 
by two greater-than signs (»). This tells 
you the message is private, or personal. I 
was the only user to see the message from 
RICKADAMS shown above. On some termi- 
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Not only does Tandy produce our favorite CoCo, we think it produces the best portable and 
MS-DOS computers as well. We've found that when satisfied Color Computer users decide 
to add portability or MS-DOS to their computing habits, many stick with Tandy. For these 
people we publish PCM, The Premier Personal Computer Magazine for Tandy Computer 

Users 

Each month in PCM, you'll find information and programs for the Tandy 100, 102 and 200 
portable computers. And you'll find even more coverage for Tandy's MS-DOS machines — 
from the graphics of the 1 000 to the power of the 5000. 

PROGRAMS AND PROGRAM DISKS! 

We learned from THE RAINBOW that readers want prnnramstotvpein. so each month we 
bring you an assortment of them: games, utilities, graphics, and home and business 
applications. For those who don't have time to type in listings, we offer a companion disk with 
all the programs from the magazine. Also included in PCM each month is the Software 
Shopper an "onmail" database service from which you can order the latest shareware 
products from our Delphi databases for Tandy MS-DOS and PC users — even if you don t have 
a modem! 

TUTORIALS AND PRODUCT REVIEWS! 

As if all this weren't enough, we offer regular tutorials on DeskMate, telecommunications 
and hardware; assembly language, BASIC and PASCAL programming tips, and in-depth 
reviews of the new software, peripherals and services as they are released. Add it all up and 
we think you'll find PCM to be the most informative and fun magazine for this market today! 



YES! Please send me a one year (12 issues) subscription to PCM for only $28.* A 
savings of 22% off the newsstand price. 



Name 



Address . 

City 

State _ 
ZIP . 



In order to hold down costs, we do not bill. 

My check in the amount of is enclosed. 

Charge to my: 
_l VISA J MasterCard J American Express 

Acct. # 



Exp. Date 



Signature 



To order by phone (credit card orders only) call 800-847-0309. 9 a.m. to 5 p.m. EST. For other inquiries call 502- 
228-4492. „ „ 

• Canadian subscribers U.S. $38 plus 7% GST. Surface rate elsewhere $64, airmail $85. Allow 6 to 8 weeks tor first 

copy. Kentucky residents add 6% sales tax. U.S. currency only, please. 

Mail to: PCM, The Falsoft Building, P.O. Box 385, Prospect, KY 40059 



nals, and with most terminal programs, a 
bell rings or the computer beeps when you 
receive a personal message. 

Notice the two occurrences of Whew ! in 
the above dialog. The first time you see it is 
when I typed it. The second time is a "re- 
peat" from Delphi. Remember, unless oth- 
erwise instructed. Delphi's Conference 
system sends all messages to all people in 
the group, even the original sender. To turn 
this off. use /NOREPEAT. To turn it back on. 
enter /REPEAT. 

Many telecommunications programs 
provide a "conference mode" where you 
type and edit line(s) of text in a window. 
When you press ENTER, the lines are sent 
through Delphi to the other users. If you are 
using such a conference mode, you may not 
want to see everything you type twice. If 
not. the /NOECHO command is for you. This 
is generally the second command I enter at 
the Conferenco prompt. If you change 
your mind. /ECHO restores the echoing of 
each keypress. If you don*t want to see what 
you type at all. use the /NOREPEAT com- 
mand, you won't get Conference messages 
from yourself. These settings last only until 
you leave the Conference area. You need to 
enter them each time you enter Conference. 

From Scratch 

So. how do you create a new Conference 
group? At the Conferenco prompt, enter 

JOIN group name 

where groupname is a name not currently in 
use by another group. You see something 
like 

Conferenco join Hi Ho! 

You have just created group "Hi 

Ho!" 

(Type Control -Z to exit back to 

menu) 

and you are now alone in a new Conference 
group. Doesn't sound like much fun. eh? 
What do you do? Well, you can /SEND 
messages to other people, and invite them 
to talk to you. (Actually, you can do this 
before creating the new group.) You can 
also use the /PAGE command. For example, 
entering 

/PAGE RICKADAMS 

sends a message to RICKADAMS telling him 
you want to talk with him in Conference. 
The /PAGE command also specifies the SIC 
from which you are sending the page. 

If you receive a page from another user, 
you can use /REJECT to reject the page, or 
/ANSWER (or /ACCEPT) to answer the page. 
The latter commands bring you right into 



the same Conference group as the person 
who paged you. However, you must al- 
ready be in Conference to use /ANSWER. If 
you change your mind, you can use /CAN - 
CEL to cancel all non-answered pages. When 
possible, it ' s a better idea to / S E N someone 
an invitation into a Conference. This allows 
you to ask a question or mention what you 
want to talk about. 

To leave Conference, press CTRL-Z or 
enter / EX I T to get back to the Conferenco 
prompt. Press CTRL-Z or enter /EXIT once 
more to return to the SIG prompt. As usual, 
enter /HELP if you need it. There are more 
slash commands available in Conference, 
so you will see a longer list if you enter 
/HELP while you are there. For more help, 
you can enter /HELP FULL. 

Miscellaneous 

A useful (and fun) Conference slash 
command is /GNAME. which you use to 
change the name of the current group. To 
change the group name Late Night Chat to 
Early Morning Talk, enter 

/GNAME Early Morning Talk 

One silly slash command (definitely not 
for use during serious meetings) is /FUDDLE, 
which befuddles everything you type. Type 
/FUDDLE ? to list all available befuddle- 
ments. For example: 

/fuddle flu 

New befuddlement 1s FLU 

Hello there. 1 have a cold in th 

e nose. 

.Eddie> Hello dhere. 1 habe a go 

Id in dhe node. 

Another fun command is /ACTION, which 
generates a random saying. /NOACTION 
generates a string of several random say- 
ings. Try them! 

We'll take a closer look at other slash 
commands next month. 

Database Information 

In OS9 Online. Bruce Isted released a 
number of useful utilities and a powerful, 
multipurpose driver, VRN. Tim Kientzle 
posted Help 2.0. a huge help-file archive 
along with a Help program to call it. This 
help archive is quite useful for anyone, but 
you'll need a hard drive for storage. Tim 
also released XYDown. a stand-alone pro- 
gram that downloads using Xmodem and 
Ymodem batch protocols. Marie-Louis 
Marcoux contributed a new version of dEd, 
which makes it easier to edit a disk's CAT 
(Cluster Allocation Table). Mike Passer 
posted an iapl interpreter for anyone who 
might be interested in this unusual and 
powerful language. 



Francis Swygert's posting. CoCollBM, 
allows an IBM PC to read a Disk BASIC- 
formatted disk. If you use Autoterm and 
want to automate your use of Delphi, you 'II 
want Carl Boll's Autoterm KSMts). Marty 
Goodman posted a bundle of information 
about the Hayes-compatible modem com- 
mand set and register setlirigs. 

Conferences 

Finally, let me mention the regularly 
scheduled conferences. All conferences 
occur at lop.m. EST: 

Steve Bjork — Games Programming 

First Monday every month 
Tim Kientzle and Eddie Kuns — 

Using Delphi 

Second Monday every month 
Jeff Parker — The CoCo Publisher 

Third Wednesday every month 

In addition to these regularly scheduled 
conferences, Carl Boll (CBJ) has informed 
me that he's hosting two open conferences, 
one March 9 and the other March 24 at 10:30 
p.m. EST. Feel free to drop in and chat! □ 



Database Report 



OS-9 SIG 

Utilities: 

GEMINI PRINTER SETUP 

NITOR Dale Wardwell 

SLOW DOWN I/O 

BRUCEISTED Bruce Isted 

LINE INPUT FOR BASIC09 

BRUCEISTED Bruce Isted 

CHOP TEXT FILES 

BRUCEISTED Bruce Isted 

NEW ALGORITHM LF STRIPPER 

MATHOMPSON Matthew Thompson 

BFORMAT 

WJMOORE Warren Moore 

DELF.AR 

DAMIONGREY Greg A. Jandl 

DHRYSTONE BENCHMARK 'C SOURCE 

BUDDCAR Bob Palmer 

0ED_PLUS IPATCH 

MARLOU Marie-Louis Marcoux 

UNZIP VERSION 3.0 

PERFUMER Ncwion White 

HELP 2.0 

TIMKIENTZLE Tim Kientzle 

Device Drivers: 

VIRQ RAM NULL DRIVER 
BRUCEISTED Bruce Isted 

Patches: 

SERIAL MOUSE DRIVER 

BRUCEISTED Bruce Isted 

MMAP PATCH 

DOCBEAR John Wesson 

CUSTOM BOOT 

KINGTRENT Mike Huskcy 

Telcom: 

XYDOWN 1.1 

TIMKIENTZLE Tim Kientzle 
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Graphics & Music: 

CHRISTMAS CM3 

R90S 

SVIEW 

SEBJMB 

HOW OFTEN I 

DFYE 

WHOLE LOTTA 

RAGTIMER 

BEATLES FOR 

RAGTIMER 

JUKEBOX PLAYER 

RAGTIMER 



PICTURES ARCHIVE 
Phil Mortenscn 



Jeff Blower 

CALLED YOU 
Danny Fye 



HAVE 

LOVE 

Mike Knudscn 
UMUSE 3 

Mike Knudscn 
FOR ULTIMUSE 

Mike Knudsen 



PLAY ICON AND AIF 

BACKFIRE 

BEATLES. AR 

DFYE 

THANKSGIVING. AR 

DFYE 

PIANO INVENTION 

PDUNC 

DOCTOR WHO 

DEANHOLDER 

LINGERIE GIF'S 

GRAPHICSPUB Bob Monlowski 

BEATLES ALBUM COVER IMG 

DEANHOLDER Dean Holder 

3D FRACTAL FERNS 

MCRISWELL Many Criswell 



Chrisiopher Johnson 

Danny Fye 

Danny Fye 
#1 BY BACH 
Paul Duncan 



Dean Holder 



Programmers Den: 

IAPL INTERPRETER 

MPASSER 

SET GLOBAL MOUSE 

MISHOO 

FILTER LF & CTRL 

BOBKEMPER 



Mike Passer 
PORT/RESOLUTION 
Mike Shook 

Robert Kemper 



68K-OS9: 

DHRYSTONE/WHETSTONE 
TJMARTIN Timolhy Martin 

CoCo SIG 

General Information: 

COCO 3 CONSUMER INFORMATION 
TOMFANN Tom Fann 

CoCo 3 Graphics: 

WHO. IMG 

TRAS Richard P. Trasborg 

ENTERTAINMENT TONIGHT "BREAST"S 



EN 



STEVEPDX 

MORE "MARRIED. 

STEVEPDX 

IMGVUE2.BAS 

TRAS 

RAS3D10.BAS 

TRAS 

ANDREA. IMG 

JOHNHOHN 

CALENDAR GALS 

LDMOORE 

NEW STAR TREK 

STEVEPDX 

MARRIED... WITH 

STEVEPDX 

COCO 3 GRAPHICS 

RICKFRANZ 

MORE DS69B 4096 

STEVEPDX 

SOAP OPERA NUDES 

LDMOORE 

640 SLIDE VIEWER 

LDMOORE 



Steve Rickctts 
W/CHILDREN" 
Steve Ricketts 

Richard P. Trasborg 

Richard P. Trasborg 

John Hohn 
IMG 

Larry Moore 
SCANS. ISHARA YAR 
Steve Ricketts 
CHILDREN SCANS 
Steve Ricketts 



Rick Franz 
COLOR NUDES 
Steve Ricketts 

Larry Moore 
VER.2 AND PICS 
Larrv Moore 



NAD1NE AND OTHER NUDES 
LDMOORE Larry Moore 

LINDA BLAIR NUDE 
LDMOORE Larry Moore 



Utilities & Applications: 

C0C02IBM 

DSRTFOX 

DIRLABEL.BAS 

MATTASHE 

L0TT080.BIN 

MISHOO 

BIORYTHMS/BAS 

JOHNALE 

BOWLING STATS 

REDCOAT 



Francis Swygert 
Malt Ashe 



Mike Shook 



Games: 

POP. ARC 
COSMONAUT 

Classic Graphics: 

XMAS CARD 
BOBCAR 



John Alexander 

V5.1 

Don Joyce 



Steve Secord 



Bob Carson 



Telecommunications: 

AUTOTERM KSM(S) 

CBJ 

HAYES REFERENCE 

MARTYGOODMAN 



Carl Boll 
TABLES 
Martv Goodman 



Soapbox (chitchat): 

MORE DRUG LIES FROM BENNETT AND 
MARTYGOODMAN Marty Goodman 



/«\ 



Exclusive! 



Clll PagesE r. a.© ♦ 



Desktop Publish 
Calllgrapher or 
Pull-dow 



'% 



Greeting Card Designer, Form Baker, 
for the CoCo3. Page size 640x384. 
lown senus, icons and dialog boxes, utport ASCII 
"text or enter fros keybord, six text with graphics, 
flow text around irregular shapes. Magnify, rotate, 
dip, enlarge, reduce, stretch and slide screen in seconds. 
Page preview, select printers fros pull-down Benu. Req: CoCo3 
Hi-Res interface, RGB/CMP Bonitor, joystidt/Bouse, 
coBpatibles, DMP105/106, CGP220 B/X, iBagewri ler , C.ITOH 8510 
printer... still only 

1500+ 



(SI 



Tandy 

or 

Prowriter 



Epson 



S49.95 



clipart for 
CIII Pages!. $29.95 

14 Banner fonts 
each set 



€111 ClipartE 
Font Set 2 /Set 3 

for CLU PagesE v. 2.0 1 set S14.95 2 sets $21.95 

HIA BH 1 «na > B 18* new docuaent fonts for all 

■J IV W UI11S versions of hjk-jo only S14.95 

C7M1 bPiUIIS (see Rainbow review 7/90) 

59 7IAX" like fonts for the Colortlax, Newspaper series and 
the RAT... onlr S19.95 

4 'III Lettrex 

Letter-quality text directly fros your current ASCII files. 
14 great NLO text fonts. Req.6« CoCo 1/2/3, Bonitor, 1 
drive, souse, Epson or coapatible printer.. only S19.95 
CIII D-Link (see Rainbow review 9/90) 
Disk to Disk Tele File Transfer PrograB. Graphics 
interface. Req. CoCo3, RGB or CMP Bonitor, Bodes, 1 Drive, 
joystick/Bouse... only S24.95 2 for S29.95 




UPGRADE POLICY: CIII ragei V.I.O owners can upgrtdt to CIII 
PagesE v. 2.0 by sending the original systes disk, copy of 

the sales slip and S12.00 to the address listed below. 



Rbovs programs sold axcluBivaly through 
PJqJeSS 1917 Madera SI. #8 

Qomputer «»■■"<""*• ■'" 53,8fi 
jijesian 

C 



Phone 14141 549 0750 

Krite/call for FREE catalog 
containing discounts 
Send Check or Honey Orders - No COD's 
All Orders add S3.00 SM, WI Residents add 5* Silw Ttx 



<fF§\ 
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rn Hyper-Tech Software 



MVCanvas2.0 
Finally a professional full screen editor for OS-9 Level II 
and Multi-Vue, MVCanvas is the only CoCo graphics editor to support 
multiple resolutions with up to 16 colors of 64 displayed in 320 x 200 
mode with palette animation and full functional clipboard. 

MVCanvas also supports multiple fonts with fewsrae, bold 
underli ne, and proportional options. Printer support includes: Epson. 
Star. C.lloh. DMP (Tandy), with color printer supported for Star 
NX- 1000 R, Citizen GSX-140. Tandy DMP-240 amd CGP-200. Epson 
LQ-2550 and compatables. 

ShcllMatc2.2 
ShellMate is the epitome of what a point and click fdc 
management system was meant to be. With ShclIMalc. you have 
access to commands such as copy. move, delete, rename, makdir and 
free at the touch of a button. It also gives you point and click access to 
the Public Domain picture display utilities VEFShow and GIFOS9. as 
well as the archive utility Ar. 

The biggest benefit of ShellMate is that it allows you to 
manipulate large batches of files with one mouse click when either 
copying, moving, deleting or arcing. You can also easily move through 
simultaneously displayed Source and Destination directory trees by 
either double clicking on a subdirectory name, or clicking on the 
"Parent" command. 



System Requirements (both programs) 
CoCo3, OS-9 LVL II. Multi-Vue. Disk Drive and 512k 

MVCanvas S49.95 

ShellMate $24.95 

S3.00 S/H S2.50 C.O.D (U.S. only) Nev. res. add 6% sales lax 

Send Check / Money Order 

Hyper-Tech Software / 434 1 Gannet Cir. #174 / Las Vegas. NV 89 103 

Phone: (702) 362-5346 



April 1991 THE RAINBOW 



57 




Wishing 
Well 



Lifeskilis 7 



by Fred B. Scerbo 

Contributing Editor 



Back in l*>85 I started a series of 
six programs titled Lifeskilis. 
which were computer simula- 
tions designed to help users react 
to real-life situations. It has been 
many years since I added any programs to 
the Lifeskilis library. (1 still use the original 
programs.) Therefore, now seems as good a 
time as any to add to that well-received 
series. 

Lifeskilis 7 is the filename used for this 
latest installment, and it attempts to famil- 
iarize users with checkbook skills. In some 
ways, it is similar to Lifeskilis I which dealt 
with subtraction skills. Instead. Lifeskilis 7 
uses a combination of written and mathe- 
matical problems to simulate the skills 
needed for balancing a checkbook. I de- 
signed this program with up to nine skill 
levels that can be selected from the title card 
by pressing the corresponding numbers on 
the keyboard. 

Another useful feature is the program's 
ability to give hints. After you choose your 
skill level, the following appears on the 
screen: 

ALLOW HINTS (Y/N>? 

If the user presses Y. the program re- 
states any math problem on the screen and 
indicates whether addition or subtraction 
skills are needed. If the user presses N. the 
program leaves it to the user to decide how 



Fred Scerbo is a special needs instructor 
for the North Adams Public Schools in 
North Adams, Massachusetts. He holds a 
master's in education and has published 
some of the first software available for the 
Color Computer through his software firm . 
Illustrated Memorx Banks. 



the problem should be stated and which 
skills to use. 

This program should be used with pen 
and paper available to help go through the 
problems manually as needed. This is not a 
program that balances a checkbook for you. 
Instead, it makes you go through the steps, 
teaching you to do it yourself. Let's face it. 
most of us probably already do this job by 
hand, even if we have a CoCo or another 
personal computer. Most programs I have 
seen that deal with checkbooks have been 
too much trouble to use regularly. Lifeskilis 
7 is designed to teach skills that are lost by 



many youngsters in this age of pocket cal- 
culators. 

When the problems actually appear on 
the screen, you are given a random account 
balance with which to work. Starting with 
the first problem, you are asked if you have 
enough money to purchase a certain item. If 
so, you go through the subtraction steps 
needed to deduct that amount from your 
checking account. 

Once the amount in your account gets 
too low. you cannot purchase anything, but 
you must still answer the questions as to 
whether or not you have enough money in 



16K Extended 



# 




25 102 395 31 

55 201 435 197 

110 25 490 111 

170 186 555 132 

225 145 595 235 

280 ...222 645 130 

330 .....92 END 108 



The Listing: LIFESKL7 



REM** 

REM* 

REM* 

REM* 

REM* 

REM* 

REM* 

8 REM** 

9 CLS0 

10 FORI 
XT 

15 FORI 
+128):: 



************************ 

LIFE SKILLS SIMULATION * 

* 

* 

* 

* 

* 



CHECKBOOK SKILLS 

BY FRED B. SCERBO 

60 HARDING AVE 

NORTH ADAMS. MA 01247 

COPYRIGHT (C) 1990 

************************ 



-1TO32:PRINTCHR$(204)::NE 

-1T0192:READA:PRINTCHR$(A 
NEXT 



20 F0RI-1T032:PRINTCHR$(195)::NE 

XT 

25 DATA93.88.96.93.88.84.94.92.9 

0. 93. 92. 93... 126. 124, 122. 125.. 11 

2.126.116.126.116.126.16.116.126 

..117.124.125 

30 DATA85... 85. . .90.80.88.85, .84 

...122. .120.117.16. 118.16. .122.. 

122. .16. 122. .117. .116 

35 DATA85...85...91.90.96.85.83. 

82. ..75, 67, 66. 69. 70. 16. ..74. .74. 

.16.74. .69.67.67 

40 DATA85 . . . 85 . . . 90 . 88 . . 85 . 80 . . . 
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your accouni. If you can't afford an item, 
you are asked how much, in addition to 
your current balance, is needed to make the 
purchase. 

At this point, the program gives you 
checks to add to your checking account. 
Here's where the addition skills come into 



play. Once a working balance has been 
achieved, you may once again go on a 
shopping spree. 

That's really all there is to it. The con- 
stant shifting of skills and questions keeps 
the program from getting boring too quickly. 
Il also helps to ensure that this simulation 



.32. .74. 69. 68. 66. ..74. .74. .16. 74 

69 

45 OATA85..90.85...90...85..81.. 

16.42. .42.37. .36.34. .42. .42.37.1 

6.42.37.37. .37 

50 DATA87.83.90.87.82.81.91.80.. 

87. 83. 87... 43. 35. 42. 39. 34. 32. 43. 

33.43.33.43.39.33.43.39.37.35.39 

55 PRINT@293." COMPUTER SIMULAT 

ION ": 

60 PRINT@325." CHECKBOOK SKILL 

S "i 

65 PRINTS357." BY FRED B.SCERB 

": 

70 PRINT0389." COPYRIGHT (C) 19 

90 "; 

75 PRINT0453." SKILL LEVEL (1- 

9) "; 

80 X$-INKEY$:IFX$=""THEN80 

85 W-VAL(X$):IFW-0THEN80 

90 PRINT0453." ALLOW HINTS? (Y/ 

N) ": 

95 X$-INKEY$:IFX$-"Y"THEN110 

100 IFX$="N"THEN115 

105 G0T095 

110 DL-1-.GOTO120 

115 DL-0 

120 CLS0 

125 Z-500 

130 OIMB$(10):FORI-1TO10:READB$( 

I):N£XT:X-RND( -TIMER) 

135 CLS0:Q-RND(10) 

140 FD-0 

145 X-INT(RND(Z))*W*2:A-X/100 

150 Y-INT(RND(Z))*W*2:B=Y/100 

155 CL-INT(RND(15)/2) 

160 N$-"##.##" 

165 CLS0:PD-PD+1:PR-1 

170 GOSUB460:PRINT" YOU HAVE A B 

ALANCE OF " : : PRINTUSING"$#.M" ; 

A:PRINT" IN YOUR CHECKING ACCOUN 

T." 

175 PRINT" THE ";B$(Q):" YOU WAN 

T C0ST"::IF WMTHENPRINT" A" 

180 IF W-1THENPRINT"S A" 

185 PRINT" TOTAL OF "::PRINTUSIN 



G"$/ 



•;B;:PRINT". DO YOU HAVE 



190 PRINT" ENOUGH MONEY TO BUY T 

HE NEW" 

195 PRINT" ":B$(Q): 

200 PRINT" ? (Y)ES OR (N)0" 

205 GOSUB460 

210 XS-INKEYS:IFX$-CHR$(3)THEN21 



215 IFX$-"N"THEN250 

220 IFX$-"Y"THEN235 

225 IFX$-"@"THEN465 

230 GOTO210 

235 IF A>B THEN PRINT" CORRECT! 

YOU HAVE ENOUGH. ":CR-CR+1 

240 IF B>A THEN PRINT" SORRY! YO 

U NEED MORE MONEY ." :WR-WR+1 

245 GOTO260 

250 IF A>B THEN PRINT" SORRY! YO 

U HAVE ENOUGH. ":WR-WR+1 

255 IF B>A THEN PRINT" CORRECT! 

YOU NEED MORE MONEY ." :CR-CR+1 

260 GOSUB460 

265 IF B>A THEN 305 

270 PRINT" HOW MUCH MONEY WILL Y 

OU HAVE": PRINT" LEFT?"; 

275 IFDL-0THEN285 

280 PRINT" (";:PRINTUSINGN$;A;:P 

RINT"-"::PRINTUSINGN$:B:: PRINT") 

285 PRINT"-> $ "i 

290 GOSUB340 

295 IF INT(C*100000+.5)-INT((A-B 

)*100000+.5)THEN400 

300 IF INT(C*100000+.5)OINT((A- 

B)*100000+.5)THEN420 

305 PRINT" HOW MUCH MORE MONEY D 

Y0U":PRINT" NEED? ": 

310 IF DL-0THEN320 

315 PRINT"(";:PRINTUSINGN$;B;:PR 

INT"-"::PRINTUSINGN$:A;:PRINT")" 

320 PRINT"-> $ ": 

325 GOSUB340 

330 IF INT(C*100000+.5)-ABS(INT( 

(B-A)*100000+.5))THEN410 



actually reviews skills that are needed in 
everyday life. 

You may check your score and progress 
at any time by pressing the @ key. Pressing 
C returns you to where you left off. A 
percentage grade score is given from the 
scorecard whenever you check it. □ 



335 IF INT(C*100000+.5)OABS(INT 

((B-A)*100000+.5))THEN430 

340 Y$-"" 

345 X$-INKEY$:IFX$-""THEN345 

350 IFX$-CHR$(13)THEN385 

355 IFX$-CHR$(8)THEN375 

360 IFXJ-"@"THEN465 

365 IF ASC(X$)<13THEN345 

370 Y$-Y$+X$:PRINTX$; :G0T0345 

375 WW-LEN(Y$):IFWW-0THEN340 

380 PRINTX$::Y$-LEFT$(Y$.WW-1):G 

0T0345 

385 C-VAL(Y$):IFLEN(Y$)-0 AND X$ 

-CHR$(13)THEN340 

390 PRINT:GOSUB460 

395 RETURN 

400 PRINT" CORRECT! YOU HAVE ":: 

PR1NTUSIN6"$##.##":C::PRINT- LEF 

T.":CR-CR+1 

405 G0T0435 

410 PRINT" CORRECT! YOU NEED " : : 

PRINTUSING"$##.##":C:CR-CR+1 

415 NM-1:G0T0435 

420 PRINT" WRONG! YOU HAVE ";:PR 

INTUSING"$#.##":A-B::PRINT" LEF 

T.":WR-WR+1 

425 G0T0435 

430 PRINT" WRONG! YOU NEED "::PR 

INTUSING"##.##":B-A:WR-WR+1:NM-1 

435 GOSUB460: PRINT" PRESS <«ENT 

ER>» TO CONTINUE."; :P0KE1535. 96 

:FORI-1TO300:NEXTI 

440 FD-1 

445 X$-INKEY$:IFX$=CHR$(13)THEN5 

45 

450 IFX$-"@"THEN465 

455 GOT0445 

460 SQ-(143+(CL*16)):F0RQS-1T032 

:PRINTCHR$(SQ ) ; : NEXTOS :RETURN 

465 CLS:PRINT:PRINT:PRINT 

470 PRINTTAB(3)"PR0BLEMS COMPLET 

ED - "PD:PRINT 

475 PRINTTAB(3)"C0RRECT RESPONSE 

S - "CR:PRINT 

480 PRINTTAB(3)"INC0RRECT RESPON 

SES - "WR:PRINT 



Revelation! 

Ihis optratifiq systea enhanceaent 
|ives you suae extraordinary 
aduanfajes for greatly menacing 
your productivity. Here's anal 
yuu get 1 

•I additional lines or lent 

HU « .V and DO k ,V\ 
3H additional lines of graphics 

mo/hd ■ .;yi 

12 HRCKO keys 

110 are defined to instantly 
produce a disk directory, 
run or list a prograa, 
set up ]?, HO, or to coluan 
screen, select RCfl or CHP 
color set, or display a line 
aidlli rulerl 

Control characters 

■ I Mat is. enter iiscii values 
I 2i directly I roa tin 
keyboard.) 

International characters 
Itnler V international 
characters froa the 
keyboard.) 



Inter coaaands in loaer case 
Use disk atule in fDSI aode 
Siaple one-key ruSI/SlQU aode 

saitch. 
Many amor CoCo III errors are 
corrected and aany aore 
amor enlianceaents are 
aade and explained in the 
docuaentation. 
>P,M an tO, D»s» lri»e let. 



Blackjack III 

this extraordinary gjae aas a hit 

at the CoCoriSI in lllanla. the 

superb graphics and talking dealer 

aikc this gaac ■ auitiee and 

aust-hear. 

lite digitized voice of the dealer 

actually speaks to you froa your 

television or aomlur UIIUOUI BHV 

nODIIIONHl HRNOUARl and each card 

has been individually dratnn aitti 

care to preserve Its proper 

representation 

•KJI SB* crj. Hit arm rta, 



Slbke Freenan 

I'V ihi 

01 1MI 

MUTANT 

I I M II I I 1 UM 

r*« ■ r-a m~ ■* *» 

Oyer IQOQ locations, ir excess of 
oil*- aeg or cospmsed graphics, 
extraordinary tehtual descriptions, 
fill. t«Rl Htt&tttt, itiu s hu63r- 
fiUed FtnttM enusrcfiaeRt like no 
other Bike this an adventure that 
no serious adventurer Bill Bant lo 
be ijtbral Vcu'li spend hours 
espiortfig z lean ouerrun Bith 
■utant punkers. skinheads and 
Blhers, then searching a dark 
cfttitriy guarded by a rude Bonk, 
dessei:d:r,g into a linuieue tine 
roaned bu daaruen miters, and 
entering the goblin c-ity inhabited 
by the debaucherous goblins and 
tfitlf luard-ioieft concur ts. 

tact, scene is constructed of 
a great nuaber of wages, 
conposiled to fori a single fraie 
ir such the sane nay Uial 



antaaton, Tors a frafce of 
an aniBated fila This special 
tSChBlepil aliens unprectdefated 

reatisa. 

Vuu buii'I find a belter or Bore 
challenging gaar for the CuCn III. 

t«tt.K '.!.'. c;;. •;;.;. ..<., i> N 



Send check or money order To 
Hubert OPPeriiiann 
a+W Oak Park Uay 
Orlando, FL 32022 
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485 TR-CR+WR: I FTR-0THENTR-1 

490 SC-INT(CR/TR*100) 

495 PRINTTAB(3)"Y0UR TOTAL SCORE 

= "SC"%": PRINT 
500 PRINTTAB(3)"ANOTHER TRY (Y/N 
) OR (C) ?"; 

505 X$=INKEY$:IFXJ-""THEN505 
510 IFX$-"Y"THEN RUN 
515 IFX$-"N"THEN CLS:END 
520 IFX$="C"THEN 530 
525 GOTO505 

530 PD-PD-1 :IF FO-0 AND PR-1 THE 
N 165 

535 IF PR-2THEN560 
540 IF FD-1 THEN 135 
545 IF NM-0THEN A-A-B:GOTO150 
550 IF A-B<-0THEN A=A ELSE A-A-B 
555 Y-INT(RND(Z))*W*2:B-(Y/100)+ 
2 

560 CLS0:PD-PD+1:PR=2 
565 GOSUB460:PRINT" YOU HAVE A B 



ALANCE OF " : : PRI NTUSI NG"$##.##" ; 

A:PRINT" IN YOUR CHECKING ACCOUN 

T." 

570 PRINT" YOU HAVE JUST RECEIVE 

D A CHECK" 

575 PRINT" FOR "; : PRI NTUS I NG" $## 

.##";B;:PRINT". HOW MUCH" 

580 PRINT" WILL YOUR NEW BALANCE 

BE ?" 
585 GOSUB460 

590 PRINT" RECORD YOUR NEW BALAN 
CE HERE.": IF DL-0THEN600 
595 PRINT" ("::PRINTUSINGN$:A::P 
RINT"+"; :PRINTUSINGN$;B; :PRINT") 

600 PRINT"-> $ ": 

605 GOSUB340 

610 IF INT(C*100000+.5)-ABS(INT( 

(A+A)*100000+.5))THEN620 

615 IF INT(C*100000+.5)OABS(INT 

((A+B)*100000+.5))THEN630 



620 PRINT" CORRECT! YOU HAVE ":: 

PRINTUSING"##.#":C:CR-CR+1 

625 G0T0635 

630 PRINT" WRONG! YOU HAVE "::PR 

INTUSING"#.##";A+B:WR-=WR+1 

635 GOSUB460: PRINT" PRESS <«ENT 

ER>» TO CONTINUE. "; : FORI-1TO30 

0:NEXTI 

640 NM-0:FD-0 

645 X$-INKEY$:IFX$-CHR$(13)THEN6 

60 

650 IFX$-"@"THEN465 

655 GOT0645 

660 CLS0:Q-RND(10) 

665 FD-0 

670 A-A+B 

675 Y-INT(RND(Z))*W*2:B-Y/100 

680 GOTO150 

685 DATA SHIRTS .CANDIES. SOCKS .DI 

SKS. BOOKS. PADS. PENS. CARPETS. SUNG 

LASSES. TAPES 



novices Niche 



Music 



CoCo3 



Music Grid 

by Tim Hennon 



If you've ever seen Close Encounters 
of the Third Kind, you may rememberthe 
scene where the humans talk to the aliens 
using different musical tones while at the 
same time flashing differently colored 
lights on a board. This program creates a 
similar effect. To see what I mean, enter 
the program and save it. Then enter RUN 
"MUSCGRID". 

A white grid is drawn on the screen. 
The boxes are filled one at a time, left to 
right, with one of eight different colors. 
Each color is accompanied by a specific 
sound. Eventually, all the boxes will be 
white. When the program runs across a 
white box. it skips a tone. You'll see. and 
hear, what I mean when you run the 
program. To stop the program, press the 
BREAK key. 

The Listing: MUSCGRID 

"MUSIC GRID 

** WRITTEN BY TIM HENNON 

1 'COPYRIGHT (C) MARCH 1991 
** BY FALSOFT. INC. 

2 'RAINBOW MAGAZINE 

3 HSCREEN 2 

4 HCLS 8 

5 C-4 



6 V-30 


19 HPAINT (H.V).C.4 


7 HCOLOR C 


20 SOUND (C*25)+5.2 


8 HLINE (20.V)-(300.V).PSET 


21 NEXT H 


9 IF V-100 THEN 11 ELSE V-V+10 


22 NEXT V 


10 GOTO 7 


23 GOTO 16 


11 H-20 




12 HCOLOR C 




13 HLINE (H.30)-(H.100),PSET 




14 IF H-300 THEN 16 ELSE H-H+40 




15 GOTO 12 




16 FOR V-35 TO 95 STEP 10 




17 FOR H-40 TO 280 STEP 40 




18 C-RND(8)-1 






/«\ 
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Protect and highlight 
gour important 
magazine collection 

with sturdy 
RAINBOW binders 




Distinctive, Durable RAINBOW Binders 

the rainbow is a vital resource to be referred to 
again and again. Keep your copies of the rainbow safe 
in our quality, distinctive binders that provide com- 
plete protection. 

These attractive red vinyl binders showcase your 
collection and ensure your rainbows are in mint 
condition for future use. Each binder is richly em- 
bossed with the magazine's name in gold on the front 
and spine. They make a handsome addition to any 
room. 
Put an End to Clutter 

Organize your workspace with these tasteful bind- 
ers. Spend more time with your CoCo and eliminate 
those frustrating searches for misplaced magazines. 

A set of two binders, which holds a full 12 issues of 
the rainbow, is only $13.50 (plus $2.50 shipping and 
handling). 

Special Discounts on Past Issues 

To help you complete your collection of the rain- 
bow, we're offering a special discount on past issues 
of the magazine. 

When you place an order for six or more back issues 
of the rainbow at the same time you order binders, 
you are entitled to $1 off the regular back issue price. 
To order, please see the "Back Issue Information 
page in this issue. 

Know Where to Look 

You may purchase the "Official And Compleat Index 
To THE RAINBOW" for $1 when you purchase a set 
of binders. This comprehensive index of rainbow's 
first three years (July 1981 through July 1984) is 
usually priced at $2.50. 



YES. Please send me 



set(s) of rainbow binders 




Take advantage of these special offers with your binder purchase: 

Save $1 off the single issue cover price for back issues. Minimum order of 6 magazines. Please 

enclose a back issue order form from a recent issue indicating magazines wanted. 

Purchase the "Official and Compleat Index to THE RAINBOW" for $1. (Regular price $2.50.) 

(These offers good only with the purchase of a rainbow binder set) 



Name _ 
Address 
City 



State 



ZIP 



□ My check in the amount of 

Charge to: □ VISA 

Account Number 

Signature 



_ is enclosed. (In order to hold down costs, we do not bill.) 
□ MasterCard □ American Express 

. Expiration Date 



Mail to Rainbow Binders, The Falsoft Building, P.O. Box 385, Prospect, KY 40059. 

currency only please. In order to hold down non-editorial costs,we do not bill. 

For credit card orders call (800) 847-0309, 8 a.m. to 5 p.m. EST 
All other inquiries call (502) 228-4492. 




Fighting back against barely 
sufficient synthesizer designs 




Mods 



by Cecil C. Houk 



I bought my first MIDI synthesizer in 1986 and now 
(somehow) I have 13 of them. The first of these was 
a Yamaha DX-100. At that time 1 used a 64K F-board 
CoCo 1 and a 64K CoCo 2. There was never a prob- 
lem using Lyra with these combinations (with the 
serial I/O port for MIDI OUT). A few months later I 
picked up a Casio CZ-230S and discovered I could not 
connect it to the CoCo 1 without getting a lot of MIDI 
errors. There were no problems with the CoCo 2 and 
CZ-230S combination. 

To make a long story short. I discovered there was 
no problem if I made a chain of synthesizers with the 
DX-loo first in line. I added more synthesizers over the 
following months and had only an occasional stuck note 
on the CZ-230S. This configuration is not recommended 
by most MIDI experts, but I have successfully used it 
with both the CoCo and PC-compatible systems. 

Two weeks ago. a friend brought his new Kawai Kir 
to me in hopes I could figure out how he could use it with 
his other MIDI equipment. When I connected it between 
the Roland MPU-IPC (the industry standard for PC- 
compatible MIDI interfaces) and the DX-100. all sorts of 
strange things happened. The DX-100 de-tuned. My CR- 
1000 Digital Drummer shut off in the middle of a song. 
The Kir produced several stuck notes. All of these things 
seemed to occur randomly. When I reversed the position 
of the DX-100 and the Kir in the chain, operation im- 
proved, but was not l(X) percent correct. When I con- 
nected the chain of synthesizers to my CoCo 3, the result 
was almost 100-percent correct operation. 



Cecil Houk, the owner of Rulaford Research, started 
making music with CoCos in 1983. Having discovered 
the world of MIDI in 1985. he now has more than 12 
synthesizers. He can he contacted at 3687 Rosa Linda 
Street. San Diego. CA 92154. (619) 690-3648. 
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Having an inquiring mind, I connected 
an oscilloscope to various points in the 
equipment to see what was going on. With 
the Kir connected to the MPU-IPC. there was 
serious ringing on the MIDI OUT signal of the 
MPU-IPC. This did not occur with the DX- 100 
connected to the MPU-IPC. I examined the 
circuitry in all my synthesizers and inter- 
faces and discovered the following: 

1 . The Roland MPU-IPC uses an open- 
collector. Hex-inverter IC for the MIDI OUT 
and Sync circuits — without a pull-up resis- 
tor. Not good! Every data sheet for this type 
of IC clearly states that a pull-up resistor is 
required for proper operation. 1 discovered 
similar omissions on the MIDI THRU circuits 
in many other synths. 

2. Kawai has pui incorrectly tuned RFl 
filters on the MIDI IN. MIDI OUT. and MIDI 
THRU signal lines of the K I. Kim. Kir. and 
Kl II. 

When these situations are combined, the 
result is that false start signals are gener- 
ated. This causes all manner of problems, 
including stuck notes and false control 
commands. The bottom line is you cannot 
use a Kawai Kl series synthesizer with the 
Roland MPU-IPC — unless you change a few 
things first. 



We are quite fortunate that there are pin- 
for-pin replacement ICs available that will 
eliminate most of the problems with MIDI. 
For years, the opto isolators in the MIDI 
circuiis have been blamed for the problems 
encountered when chaining synthesizers. 
They aren"t the culprits. The problem is the 
use of open-collector circuits without the 
mandatory pull-up resistors. It's no wonder 
these devices don 't work the way they were 
intended. 

Down to the Fix 

As we look at the methods I found to correct 
the problems, bear in mind opening your 
synthesizer voids the warranty in most cases. 
Most manufacturers prohibit user altera- 
tions to the circuitry. Neither I. nor THE 
RAINBOW, assume any liability for damage 
resulting from the modifications outlined 
in this article. 

In the Roland MPU-IPC. remove IC12 (a 
74LS03) and replace it with a 74LSI4. Also, 
remove R38, R39 and R40 (4700 ohm). While 
you are at it. put ajumperfrom Pin 5 of IC12 
toGround.Thiseliminatesa"floating"gate 
condition in the unit. 

For the Kawai Ki/KlM. remove IC U25. 
From the Kl II, remove IC U10. Remove K"2 
from Kir. This is a 74LS03, which should be 
replaced with a 74LSI32. Also, remove all 



the RFl filter components in the circuit. 

In the Casio CZ-230S, the 74LS04 should 
be replaced with a 74LS14. Remove all the 
RFl filters (including the two ClOi capaci- 
tors). Add a 220-ohm resistor in series with 
Pin 1 of the PC900 and the MIDI IN jack. 

In the Roland MT-32, IC25 (a 74HC04) 
should be replaced with a 74LS14. Three of 
the gates in 1C25 are not used. Two of these 
gates can be used to replace Q6 and Q7. But 
this is hoi a job for novices. If you are a 
skilled hacker, though, you should be able 
to take care of this. 

Because IC2 cannot be changed to a 
Schmidt Trigger in the Yamaha FB-01 , pull- 
up resistors should be added to pins 4 and 
10. Use a value of approximately IK. 

If 1 didn't mention your particular synth, 
it isn't because there isn't a problem. Many 
other synthesizers need correcting, and I 
hope to provide more information in the 
future. 

If you encounter problems in making 
these modifications, or if you have a prob- 
lematic synthesizer not mentioned, leave a 
message for me on the Rulaford Research 
MIDI BBS and I'll try to help. To contact the 
BBS, call (619) 662 -242x. The modifications I 
have described here are intended to correct 
design problems in the MIDI THRU ports on 
commercial equipment. /W\ 



Quality 039 Software 

from 

Co lorSys terns 



Specialty Programs 
MVBannsr Brand Newt 

Mike PrmtM Sinners 
in cne MuUi-Vue 
Environment 
Features [nclwoe: 
'Pull Down* Menus 
On-Screen Previewing 
27 Built-in Ineges 
Two Fonts, [iiege Etfttdr 
ana Hucn Mart I 
512K end Mouse/JoysticK 
Requi'eo 

Only $20 

WPShel 

A Worfl Proccessing 

Oriented Grepnics Snell 

A 'Point end Click* 

Interface to ell your 

word Processing Needs 

'Pull Oovn* Menus 

user Customizeaie 

Works vitn any Editor. 

Text Fornitter 4 

Spelling Checker 

'WPSr*i a ■ urge*". *•** 

DiitPucXetT OnlyJ^-tf 
Dec'90RarMw 



All Programs 
Require Muiti-Vue 

IWnctnt Moflwu Support) 

Please add S3 For 

Overseas Snionents 

nc Residents 

add 6* Sales Tax 

Colorlyateai la plvaaed to 
Announc* affiliation Mlth the 
Interactive Media SyateaiB 
Developer'a Association and 
plana to offer full suppori 
for the NM/1 and OK aindoss 



Games 

AMMtamctMg 2 Nww Cmmii 

Minefield 

"ro- rnv get I aecrs! *«a»g* 

to HeadQwenors out a 
UneheW itenoi terweer you> 

Set Battle 

Its re ega-ist me compute 1 in 
a rearec cattle a' seal Be *-* 

'its: to *n« an of you' 
opponent* task force to in 

Other Gaaee 
Pyramid Solitaire 

Revievpd In Tne RatnOov 
OCtODer 1990 

KnlghtaBrldge 

A variation of Chess 

. . '." randomness thrown ini 

CoCothello 

Otnello for CoCo3 
NOWi For 1 or 2 Beyer Gam* 

CoCoYahtzee 

Dice Poker far CoCo3 
All genes in full color ma 
require a nouse or joystick 

All Ge™es just 910 eecn 

or any 3 'or $25 



$40! 



Sptenl 0i«e p«cm. HI 
6 Canes on ens sate oisx 

ColorSystems 
P.O. Box 540 
Castle Itayne, NC 28429 
(919) 675-1706 (voice) 
(919) 675-1847 (BBS) 

lounge i operjieo Dy Ztc» C. Sessions! 



SUPER SOFTWARE AT AFFORDABLE PRICES!! i 

CC3FLAGS Reviewed Augusl. 1 989 page 97 $1 0.00 

VOCAB "quiie a good program Ior$l9.00"-March '89. page 104 $10.00 

MASTERDIR "a very good disk calaloger... October '89. page 106 $10.00 

PROGRAMS FOR FRIENDS — includes— .wacko.— cahada~...europe and 

SMARTVTHEPIG - $10.00 

GALLERY MAKER ...W/NIB COMPRESSOR.-create COCO gallenes....S1 0.00 
PUZZLES.. ..W/NIB COMPRESSOR...8 hires )igsaw5 $10.00 



CURRENT BEST SELLER!!! 



THE RAINBOW INDEXES brand new databases of articles, product 

REVIEWS AND TAPE'OISK OFFERINGS FROM THE RAINBOW ..STARTS WITH RAINBOW'S ORIGINAL 
ISSUE ENDS WITH JUNE 1990... .100% ML...OVER 7200 ENTRIES ...COMES WITH BOTH COCO 1/2 
AND COCO 3 VERSION ...THUMB THRU DATABASES WITH A SINGLE KEV....COCO 3 DISPLAVS 15 
ENTRIES ON SCREEN (COCO 1)2 SHOWS 2 AT A TIME)... EXCELLENT FOR ™D' NG ''f ^""Jltf.' 
FROM YOUR COLLECTION. ..THESE ARE USEFUL. MUST-HAVE PROGRAMS ONL.YM...51U.UU 



OH 



£t 



tx 



TETRA.... BRAND NEW.. ..Fantastic lun with my version of a popular home 
entertainment game. Colorful display, high score save. 10 levels of difficulty, random 

piece selection .... REQUIRES COCO III $10.00 

SYNCOM Platinum Flippy Diskettes.. ..greal value lor single sided disk drive 
owners (S2.00 shipping/handling any size order) box Of 10... .$8.00 

COMING SOON: A NEW SUPER CC3/RGB MASTER DIR 3 



SPECIAL 



ORDER 3 PROGRAMS FOR $25 AND 
RECEIVE A FREE BOX OF FLIPPIES 



SEND CASH, CHECK OR MONEY ORDER FOR FAST RETURN 
PLEASE INCLUDE S2.00 FOR SHIPPING/HANDLING 



RICK'S 



COMPUTER 
ENTERPRISE IS*™.™.**™ 



TUB RADTBOW IS A REGISTERED TRADEMARK OP FALSOPX INC. 
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Graphics 



CoCo 1 , 2 & 3 



First Prize 




Having recently moved some 
20 miles from North Ridge- 
ville. Ohio, to Strongsville. 
my life is packed away in a 
hundred or so cardboard 
boxes. This means it takes me 20 minutes to 
find my stapler and another 20 to find the 
staples. I thought I had everything reasona- 
bly planned out. I connected my CoCo 3 
system and everything looked good. When 
I turned the power on. the Read/Write light 
on my hard drive came on. (Uh, oh!) 

I stopped backing up my hard drive 
some time ago (the procedure used more 
than so disks and took hours.) I quickly 
realized I wouldn't be running OS-9 for a 
while. It wasagood time to get a Disk BASIC 
program to review for THE RAINBOW. 

First Prize, by Zebra Systems. Inc.. 
produces diplomas, certificates, licenses, 
awards, and similar official looking 
documents. First Prize runs on either a 
CoCo 1 or 2 with 64K or any CoCo 3. You 
must also have a mouse or joystick and a 
compatible dot-matrix printer. I used a CoCo 



3 with an older-style Radio Shack joystick 
and an Epson FX-S6E. First Prize is not 
copy-protected (thank you Zebra Systems) 
and you are encouraged to make a backup. 
It can use up to four floppy drives and 
employs Zebra Systems" graphics user inter- 
face. The program is very easy to use — 
creating documents requires little effort. 

Although First Prize comes on a set of 1 
disks, nine of the disks contain the template 
files that are used to create documents. II 
you spend any time with the users manual, 
read the brief section about templates. 
Understanding the components of templates 
is essential to effectively use First Prize 
since you build documents by assembling 
the various parts of a template. You cannot 
preview a complete document on the screen. 
You must print the document (design) to 
your printer to review your work in prog- 
ress. However, this is not a big drawback. 

Templates have six parts as follows: 

1. Borders — you can select from a 
dozen or so. 



2. Title — many of the loo templates 
already have titles. You can design others 
yourself. 

3. Artwork — I'm not sure why artwork 
is considered a separate part. Either there is 
artwork in a given template, or there isn't. 
You don't do anything with this part and 
cannot design your own artwork. Plenty of 
artwork is already provided in the 173 tem- 
plates. 

4. Body Text — enter anything you can 
type in seven lines. You can also pick from 
the five fonts included. 

5. Signature Line — this is the text that 
is to appear below the signature line. 

6. Date line — enter the date to be 
printed on the document. 

A printed template directory contains 
references to the 173 templates. The direc- 
tory shows pictures of all templates and is 
essential to using the program because the 
template files are numbered T101-T825. With 
descriptive filenames like that, you'll spend 
a long time loading and printing the indi- 
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vidual template files if you lose the direc- 
tory. (Maybe this is some new form of copy 
protection.) My advice is to keep the direc- 
tory in a safe place. 

The documentation consists of a 60-page 
template directory and a 35-page users 
manual. The users manual is well-written 
and has plenty of helpful illustrations. If 
you're already familiar with Label Designer. 
you probably won't need to spend much 
time with the users manual, though. 




First Prize is available for $49.95. plus 
shipping and handling. When you consider 
that many software companies charge S8 to 
$20 for accessory disks, the nine you get free 
from Zebra Systems make 'First Prize a 
first-rate product. 

I'd like to say something about Zebra 
Systems' customer service, but First Prize 
never gave me any reason to call ihem. The 
program works flawlessly and its graphic- 
interface makes using it natural and logical. 

If you need, or want, to produce official 
looking documents try First Prize. It is 
another excellent bit of programming by 
Jeff Street, author of Label Designer. I do 
not find fault with the program except that 
it does not permit previewing completed 
documents before printing them. 1 think 
First Prize is very useful. However. I didn 't 
expect that when I gave my secretary a 
Secretary of the Month award, she'd ask me 
for a raise. Thanks a lot Zebra Systems! 



(Zebra Systems, Inc., 121 s. Burrowes 
Street, State College, PA 16801; 814-237- 
2652: $49.95, plus $3 S/H) 

— Ernest F. Zore 



The Rainbow Bookshelf 



The Rainbow Book of Simulations 

20 award-winning entries from THE RAINBOW'S first Simulations contest. 
The Second Rainbow Book of Simulations 

The 16 Winners from our second Simulations contest. 
The Complete Rainbow Guide to OS-9 

Authors Dale Puckett and Peter Dibble demonstrate OS-9"s multitasking and multiuser features. 
The Complete Rainbow Guide to OS-9 Level II Vol.1: A Beginners Guide to Windows 

Pucketl and Dibble uncover the mysteries of the new windowing environment. 
The First Rainbow Book of Adventures 

Contains 14 winning programs from our first Adventure contest 
The Second Rainbow Book of Adventures 

Featuring 24 of the most challenging Adventure games ever compiled. 
The Third Rainbow Book of Adventures 

The Excitement continues with 19 new Adventures. 
The Fourth Book of Adventures 

Fourteen fascinating new Adventures from the winners of our fourth Adventure competition. 
A Full Turn of the Screw 
The Rainbow Introductory Guide to Statistics 

Dr. Michael Plog and Dr. Norman Stcnzcl give a solid introduction to the realm of statistical 

processes. 



Name _ 
Address 
City 



State 

J Payment Enclosed, or 
J VISA -i 



Zip. 



□ Charge to: 
MasterCard J American Express 



Account Number 

Card Expiration Date 
Signature 



JThe Rainbow Book ot Simulations (first) S ASS'S 3.50 

J Rainbow Simulations Tape Hirst) S^SS" S 3.50 

j First Simulations Package S1A90" S 6.00 

JThe Second Rainbow Book of Simulations S^sS S 4.95 

J Second Rainbow Simulations Tape $,St95" $ 4.95 

J Second Rainbow Simulations Disk Sie^S" S 4.95 

J Second Simulations Package with Tape $J9Sfj $ 8.95 

J Second Simulations Package with Disk SJOflO $ 8.95 

JThe Complete Rainbow Guide to OS-9 $193$ $12.95 

□ Rainbow Guide to OS-9 Disk Set (2 disks) S3XJ6 $19.95 

J Rainbow Guide to OS-9 Package $££95 $29.95 
JThe Windows & Applications Disk for 

The Complete Rainbow Guide 

lo OS-9 Level II. Vol. I $1995 

JThe Rainbow Book of Adventures (first) $J<95 S 2.00 

J Rainbow Adventures Tape (first) $^95' S 2.00 

j First Adventure Package SJ5*S S 3.50 

JThe Second Rainbow Book ot Adventures $1£9S $ 6.95 

J Second Rainbow Adventures Tape $.1335 $6.95 

J Second Adventure Package $27flfl Si 1 .95 

JThe Third Rainbow Book of Adventures $1*35 $ 6.95 

J Third Adventures Tape $,A95 $ 6.95 

jThird Adventures Disk Set (2 disks) SJASS $ 7.95 

J Third Adventure Package with Tape $.2*80" $1 1 .95 

OThlrd Adventure Package with Disk S2&SC $12.95 

JThe Fourth Rainbow Book of Adventures SJOflS S 7.95 

J Fourth Adventures Tape 5,A95 S 6.95 

J Fourth Adventures Disk $J4^5 $11.95 

J Fourth Adventure Package with Tape $.2830 $13.90 

J Fourth Adventure Package with Disk $2530" $18.90 

J A Full Turn ot the Screw $1 9.95 

j Introductory Guide to Statistics $^&95 $ 2.95 
J Guide to Statistics Tape or Disk (Indicate choice) $Jk95 $ 2.95 

j Guide to Statistics Package $.1230 $ 4.95 

(indicate choice ot tape or disk) 

Add $2 per book Shipping and Handling in U.S. 

Outside U.S., add $4 per book 

Kentucky residents add 6% sales lax 

Canadian residents add 7% GST 

(Allow 6 to 8 weeks lor delivery) Total 

Mail to: Rainbow Bookshelf, The Falsoft Building, P.O. Box 385, Prospect, KY 40059. To 
order by phone {credit card orders onl?) call (800) 847-0309, 8 a.m. to 5 p.m. EST. For other 
inquiries call (502) 228-4492. 

Please note: The tapes and disks offered by The Rainbow Bookshelf are not stand-alone products. That is. they are intended 
to be an adjunct and complement to the books. Even if you buy the tape or disk, you will slill need the appropriate book for loading 
and operating instructions. OS-9 is a registered trademark of the Microwave Systems Corporation. 
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Utility 



OS-9 



Math.l Library 

The Math.l package from Bits-n-Bytes 
is a relatively complete math library for the 
OS-9 C compiler, and it includes most trigo- 
nometric functions. The disk includes the 
complete Math.l Library, five sub-library 
modules that can be used to create custom 
libraries, and shell scripts to assist you in 
building custom libraries. All of the relo- 
catable object files are also included in case 
you want to build a custom library consist- 
ing of one or more modules from each 
component library. 

The trigonometric functions supported 
include the basic cosine, sine, and tangent. 
To that it adds secant, cosecant, cotangent, 
arcsecant. arcsine. arctangent, arccosecant. 
arccosine. and arccotangent. It also sup- 
ports the hyperbolic versions of all of these 
functions. Other functions include facto- 
rial, square root, natural logarithm and Base- 
10 logarithm, power and Base-to power, 
sign, double absolute value, a random 
number generator, truncation and round- 
ing. An oddity here is that ln( ) finds the 



he Math.l 
package from 
.Bits-n-Bytes is a 
relatively complete 
math library for 
the OS-9 C 
compiler. 



natural logarithm and t og( ) handles Base- 
10 logarithms, which is the standard for 
mathematicians. However, the standard 
among most math libraries is that log() 
finds the natural logarithm and loglOO 
finds Base- 10 logarithms. Be aware of these 
differences. It would also help if more in- 
tuitive function names were used in several 
of the functions. For example, the cosecant 
function could have been called cosecO 
instead of esc ( ). 

An obvious omission from the package 
is a header file to prototype each of the 
functions included in the library. This is 



particularly troublesome since the C com- 
piler assumes all functions return an integer 
value unless explicitly told otherwise. By 
default the compiler either automatically 
casts the value returned to a signed integer, 
or assumes the value returned is an integer 
and thereby returns seemingly random 
garbage if the actual function returns values 
of type f 1 oat ordoubl e. Unfortunately, the 
author implies in the examples that you will 
manually type the prototype, or function 
declaration, for each function in every 
program you use. As an alternative. I sug- 
gest the author include a math. h file with 
the function prototypes in the DEFS direc- 
tory in a future revision. 

The manual is confusing in certain in- 
stances and seems thrown together in a 
random manner (wit h no index). You spend 
most of your time trying to locate each 
function in the manual rather than actually 
programming. The material in the manual 
is broken into logical sections (General 
Math Functions, Basic Trigonometric 
Functions, etc.), but locating a specific 
function is difficult without the aid of an 
index. Some of the functions, such as 
red_root ( ), are documented in such a way 
as to make you wonder if the function is 
included in the library or you are supposed 
to enter the source code provided to emu- 
late the function. However, the global vari- 
able list for the sqrtO function on the 
previous page shows that it is included in 
the library. The manual does provide a lot 
of useful information, including a list of 
external references, the amount of memory 
required for code and data, and an example 
of each function. Even so, I think the author 
could have spent a little more time organiz- 
ing and formatting the manual to make it 
more readable. 

The only real problem I ran into with the 
Math.l Library is that each function causes 
your program to exit abruptly if an error is 
detected. No error-checking option is given. 
You either check the values to make sure 
they are in the proper range before calling 
the trigonometric functions, or take your 
chances. I had always assumed that the 
programmer had the responsibility for 
deciding how to handle errors. Well, that's 
definitely not the case in this library. 

The results generated by each of the 
functions are accurate according to my 
calculator. One confusion factor to be aware 
of is that many formulas given in the manual 
appear incorrect. For example, the manual 
appears to state that the formula for calcu- 
lating the secant is l+cos(x). Fortunately, 



this is a case of mistaken identity. If you use 
a magnifying glass you will discover that a 
mathematical division symbol is used, even 
though it looks strikingly similar to a plus 
sign. In other sections of the manual, a slash 
is used to denote division. The manual also 
uses a lowercase x for multiplication in- 
stead of an asterisk, perhaps just to keep 
you on your toes. Well, there's something 
to be said for standardization and easy-to- 
read manuals. 

Obviously a C library is not standard 
fare for the average computer user. But if 
you need a math library, and you take into 
consideration the caveats listed here, this 
package should get you going. All things 
considered. Math.l Library is a good deal. 

(Bits-N-Bytes, 4140 Victory Drive SW, Port 
Orchard, WA 98366; $27.42) 

— Greg Law 



Utility 



CoCo1.2&3 



Bed 

What would you think of if you were 
asked to review a program called Beef! All 
kinds of ideas went through my mind. 
Thoughts of some sort of sexy game were at 
the top of the list. Well. I was surprised to 
find that Bed is actually a neat binary- 
editor, disk-utility program that allows the 
user to change the contents of and repair a 
crashed disk. 

Bed works on any C0C0 equipped with 
a disk drive. It ' s not copy-protected, so you 
can make a backup for safekeeping. The 
program does not require many instruc- 
tions on its use. Be cautious, however, 
because it's easy to destroy a file or pro- 
gram if you don't know what you are doing. 
Bed is for experienced users who under- 
stand sectors, granules, and file allocation 
tables. 

Loading and running Bed is a snap. You 
are presented with a menu of available 
options: 

R — reads a sector after entering the 
track and sector numbers. 

E — al lows you to edit the disk contents 
in ASCII. Decimal, or Hex. Use the up and 
down arrows to reach the desired sector. 

D — displays a sector, but does not 
allow you to edit. It's best to use this feature 
when exploring, so you can't harm the disk 
contents. 
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UTILITIES 1-8 



• 12 Programs Each, 1-4 Require Disk • 

U1 - Backup 35, Baslcmap, Timer, Tape-to- Disk, ♦ 

U2 - Customize, DiskTest, MasterDisk, Offset, ♦ 

U3 - View 64, DiskAid. Disk Library, Atari, * 

U4 - AutoBoot, MacPicture, StateLog, UniBack, ♦ 

U5 - Disassembler, Graph, PaintPot, Squeeze, + 

U6 - Clock, Uist 32, , MiniDos, Pbceomp, + 

U7 • Head Print With 30 Mini Pictures 

U8 - Fig Forth Language With Tutorial 




Musk 1-7 

M1 - 8 Utilities & 8 Songs 
M2- 17 Musica Files\ Ranutas 
M3 - 1 6 Musica Files > H25T 
M4 - 16 Musica Files/ MU5ca 
M5 - 25 Orchestra Files 
M6 - 23 .Bin Files Ready To Run 
M7 - 23 .Bin Files Ready To Run 

ADVENTURES 1,2 

Ready To Run 
Order A1 Or A2 



GAMES Ml 

• Each Disk/Tape Contains 12 Programs • 
GA1 - 3D Tic Tac, Missile, Poker, Tycoon, + 

Amazing, Balloons, Motor Jump, Slots, ♦ 
Battleship, Golf, Lander, Zero b. + 
ABM, LunarWorid, Protect, Subchase, ♦ 
Blackjack, Lazer, Tipan, Utopia, ♦ 
Kings, Maze, Shuffle, Tempest, ♦ 
Chess, City, Life, SlarTrek, + 
Chute, Germ, Hurkle, Lunar, + 
Civil War, Go-Fish, Stock, UFO Maze, ♦ 
GA10 - Cave, HILow, Scramble, Word Hunt, ♦ 
GA11 - Bkxythms, Craps 3, Gunner, Martian*, ♦ 



GA2- 
GA3- 
GA4- 
GA5- 

GA6- 
GA7- 
GA8- 
GA9- 



EDUCATION 1-4 

E1 - 12 Programs For Young Kids 

E2 - 1 2 Programs For High School Kids 

E3 - 11 Programs Teaching Coco Commands 

E4 - 5 Graphics Programs About Australia 

GRAPHICS 1-14 

GR1 - Atlanta, Cube, Space, * 

GR2 - Objects, Wargame, Woridmap, » 

GR3 - 9 Coco 3 Graphic Programs 

GR4 - 22 Coco Max Pictures 

GR5 - 22 Coco Max Pictures 

GR6 - 22 Coco Max Pictures 

GR7 - 15 Coco Max Pictures 

GR8- 22 .Bin Pictures 

GR9- 22 -Bin Pictures 

GR10 - 14 Large .Bin Pictures 

GR11 -8 Mge Pictures 

GR12 - Coco Max 3 Pictures 



AncJ Don'T FoRqET 

MoNThly BAck Issues 

Of OmqiNAl 

SubSCRipTIOlM SofTWARE 




GR13 - Macpaint Graphic Editor 
GR14 - 5 Macintosh Pictures 

TELECOMMUNICATIONS 1-3 

T1 - Haysae, Kermit, Mikeyterm, Teleterm 
T2 - Cobbs BBs Terminal Package 
T3 - GETERM Communications 

HOME MANAGEMENT 1-4 

• 12 Programs Each Disk/Taps • 
H1 - Checkbook, Loan, Word Processor, ♦ 
H2 - Cash Journal, Invest, MailHst, ♦ 
H3 - Lite, Database, Stocks, ♦ 



H4 - Spelling Fix, Spelling Checker, + 
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ISSUE #91, JAN 1990 

TRENCH FIGHTER 
C0CVERT3 
SPEED GAMES 
BUSINESS STARTER 
CAVERN QUESTS PT. 2 
BUILDERS HEPER 
TAR2ARIV 
ADDRESS IT 
ANIMALGRAPHICS 

■smvni 

ISSUE #97, JULY 1990 

FCC EXAM HELPER 
EMPLOYEE SCHEDULE 
FLYING SAUCER ADV. 
SPEECH AID 
MOWER MADNESS 
JET TRIVIA 
INSTANT CALENDAR 
WORLD MASTER 3 
AIR WAR 3 
i-ia:'JB:!l3 



ISSUE #92, FEB 1990 
PENTASAME 
ROTISSERIE LEAGUE 
NICKS OUEST 
SOUTAIR 
EDUCATION 4 
IBM -BASIC 
BASEBALL CARD ORG. 
MUNCHY3 

river raid 3 
hhbik 

issue #98, aug. 1990 

aiPPY TUTORIAL 
RECIPE/MEAUGROCERY 
DUNGEON MAZE 
SNOW SKI 
HOT LOAD 
SHIP WAR 
ERROR TRAP 
SPACE WAR 3 
MAZE MASTER 3 



ISSUE #93, MAR 1990 
MR MOVIE 
INVADERS 

C0C03 RECIPE MACHINE 
SILVERCAPE3A0V. 
BABY-SITTER'S BASE 
BIBLE SCRIPTURE 
VOCABULARY QUIZ 
DROP PACK 
DOCTOR WHO 3 

ISSUE #99, SEPT. 1990 

IDEA TREE 

MASTER'S LABYRINTH 
MORSE CODE 
TELESALE CONTACTS 
PROMISED LAND QUIZ 
PROPOSAL WRITER 
ALPHABET SCRAMBLE 3 
MAGIC PUMPKIN 
DRWH03PART4 



Last 12 Issues Shown Here 



ISSUE #94, APR. 1990 
FLASH CAR0 
REAL ESTATE LISTINGS 
BIBLE QUESTIONS I 
SPELLING QUIZ 1 
NO LEFT 3 
PICTURE VIEWER 3 
TANK SHOWDOWN 
TARZAR 5 ADVENTURE 
GENESIS 

■itiiiiwnm 

ISSUE #100, OCT. 1990 

Z0T MIND GAME 
SUPER TEXT EDITOR 
SUPERTEXT FORMATTER 
TURTLE SEARCH 3 
COAST TO COAST 
EASY BASIC 3 
DRAGON ADVENTURE 
WRITE OUT UTILITY 

TRYTHIS 

■laiillllBIUBBB 
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ISSUE #95, MAY 1990 

DREAMTIME ADVENTURE 
XT/AT SYSTEMS 
BIBLE QUIZ 2 
16 FLAGS 
FRACTIONS 
SOLITIARE PUZZLE 4 
5I2K RAM DRIVES 3 
FOOD FACTORY 3 
WHO PART 2 
ili'.'iif.m 

ISSUE #101, NOV. 1990 

GOSSIP 

COST ESTIMATOR 

SALON INVENTORY 

PERSONAL STATSTKIAN 

BINGO CALLER 3 

ALAIX-3 

DEATH HUNT 

512K«AM/CATALOGER3 

DUCK HUNT 



ISSUE #9S, JUN 1990 
ENTREPENEUR 
DR PHREDI 
PRINTER FONT CODES 
BIBLE QUESTIONS PT. 3 
CALO ADVENTURE 
FORM MAKER 
DRAGON ESCAPE 
PLANE EXPLORER 
WHO PART 3 




ISSUE #102, DEC. 1990 
REAL ESTATE ANALYSIS 
COCO PAYROLL 
DR STRANGE ADVENTURE 
TANNING SALON 
TREASURE HUNT 
RIVERBOAT BLACKJACK 
TURTLE RACE 3 
SUPER SCREEN DUMP 
KEYBOARD REMAP 



SINGLE ISSUE t B.OO 

2-5 ISSUES $ 6.00 EA 

6-1 ISSUES $ 5.00 EA 

1 1 OR MORE ISSUES $ 4.50 EA 

ALL 102 ISSUES $ 260.00 

PURCHASE 20 ISSUES AND KCCEIVC A FREE 6 HONTH SUB 

f MAIL TO: *\ 

T&D Subscription Software 

2490 Miles Standish Drive 

Holland, Michigan 49424 

(616)399-9648 

Call or write for a FREE catalog ! 




MasterCard 
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. WE SEND 1ST CLASS - NO CHARGE ■ 
. PERSONAL CHECKS WELCOME • 
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CD 
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. State- 
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Credlt Card 8_ 



Expires- 



TOTAL AMOUNT $_ 



Public Domaiim 

Single Disk/Tape. .S8. 00 each 
2- 5 disks ta pes.... S6. 00 each 

6 or more $5.00 each 

All 53 disks/tapes $1 45.00 
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TAPE 



DISK 



W — writes your changes to the disk. 
You can also make a hard copy if you have 
a printer. This is recommended before you 
do any editing so you can go back and make 
corrections if needed. 

F — searches the disk and finds bad 
sectors. This is a very powerful feature that 
helps you fix a crashed disk. 

As always, it*s best to make a backup of 
the original disk and use the backup to do 
the actual editing and writing. Since this is 
not always possible with a crashed disk, the 
author provides some neat tricks you can 
try. A fairly simple explanation of disk data 
storage is provided in the instructions. Using 
this information as well as reading other 
publications on how the CoCo disk system 
works can provide some excellent training, 
thus giving even a novice user valuable 
knowledge. 

Be d is a powerful disk-editing and repair 
utility that I recommend. It does just what 
it's supposed to do without a lot of fanfare. 
The onscreen displays are uncluttered and 
easy to read. 

(Robert W. Ruedy, 129 Prairie. Verdon, 
II. 62690; $13.95, plus $2.95 S/H) 

— Robert Gray 



Amateur Radio 



CoCo3 



CC3FAX 

CC3FAX is a radio-facsimile (fax) receiv- 
ing program written for the .M2K CoCo 3 
with a disk drive and two-button joystick. 
Obviously, you also need a shortwave radio 
receiver capable of receiving facsimile 
signals. Such a receiver is suitable if it can 
receive SSB (Single Side Band) or CW 
(Continuous Wave, or Morse Code) trans- 
missions. The receiver must be very stable 
to prevent frequency shift and subsequent 
picture distortion. 

Generally, solid-state shortwave and 
amateur-radio receivers are excellent for 
this purpose. Hookup and operation are as 
simple as attaching [he speaker or head- 
phone output of the short wave receiver to 
the cassette (black) plug of the CoCo 3. The 
Main menu appears when you load and run 
CC3FAX.BAS. The 80-column screen shows 
the menu with these options: 

1 Run fax program 

2 Enable 40-track 

3 Get instructions 

4 Exit program 

The fax program screen is similar to the 



wefax program published in the rainbow 
(February 1985. Page 42). Notable excep- 
tions are the ability to clear the video screen, 
a SOUND command, and easier to understand 
View and Load options. As with WEFAX, all 
onscreen commands are selected with the 
joystick using the point-and-click method. 
The CLEAR command is helpful when you 
want to clear all of the graphics from 
memory. This prevents getting fragments 
of old pictures mixed in with new images. 
The SOUND command turns on your video 
monitor speaker so you can hear the level of 
audio coming into the cassette port. This is 
helpful in those cases when plugging into 
the radio receiver's headphone jack discon- 
nects the set's internal speaker. Other op- 
tions include the selection of 60, 90 or 120 
Ipm (lines per minute). You can also select 
either the upper or lower sideband if you are 
not sure which one the fax station uses. 
However, virtually all fax transmissions 
are sent in the upper sideband. Interstation 
interference may be less on the other 
sideband. CC3FAX flips white and black 
based on your sideband selection, so re- 
ceived colors are correct. Also, post-recep- 
tion noise filtering (light or heavy) can be 
used to clean noisy images. This is espe- 
cially helpful to users who live in the center 
of the United States where reception of U.S. 
Navy faxs is problematic. 

Unlike WEFAX, which displays fax im- 
ages on PMODE 4 screens, CC3FAX receives in 
the CoCo 3 Hi-Res mode. Although my 
finished printed copy is no different, the 
onscreen image is much better with CC3FAX. 
The full image is equivalent to 60 PMODE 4 
screens. You can move the joystick over the 
entire image, but you can't see it all at once 
onscreen. [Editor's Note: The author has 
told its that Version 2.0 allows you to view 
the entire multi-screen image in a con- 
densed form on a single screen. This lets 
you get an overview image, although it is 
necessarily distorted.] Pressing the second 
joystick button allows you to toggle be- 
tween pixel resolutions of 256-by-225 and 
640-by-225, making larger images easier to 
see. A command for printing the image is 
also available. A command is included to 
reverse the image. I do this when there is a 
lot of black in the image; this saves quite a 
bit of ink in the printer ribbon. 

CC3FAX also incorporates a 40-track disk 
option. Using this option allows you to save 
all of the fax image if you have a double- 
sided drive. Such a disk can store 1920 lines 
or 16 minutes of data at 120 LPM. Single- 
sided disks work fine, but can only store 
about half of the larger images. 

The operating instructions, including 
popular fax frequencies, are included on the 
disk and can be read onscreen or sent to a 
printer. Operation is fairly simple, but first- 



time users may encounter some problems 
due to unfamiliarity with fax transmissions. 
Once you get used to fax. you will be 
hooked. CC3FAX is a fine program if you are 
interested in expanding your use of the 
CoCo. Shortwave listeners (SWLs) and 
amateur radio operators (hams) will be 
delighted with it. 

(Robert Gault, 832 N. Renaud, Grosse 
Pointe Woods, Mi 48236; $29 plus $4 S/H) 

— Jerry Semones 



Utility 



OS-9 Level II 



Level 11 Tools 

Level it Tools is a software utility pack- 
age offered by Alpha Software Technolo- 
gies for use on a Color Computer 3 with at 
least one disk drive and running OS-9 Level 
II. With this package you can use wild cards 
with the copy, del and attr commands. 
You can also map your directories, and take 
control of color manipulation and window 
functions. This package includes filters to 
convert text files from uppercase to lower- 
case and vice versa, and an assortment of 
other utilities. 

OS-9 has always lacked the convenience 
of wild cards. Wild cards provide the ability 
to specify partial filenames using the meta- 
character *. For example, if I want to copy 
all filenames in a specific directory with the 
extension . c from my hard drive to a floppy. 
I must type each filename in a copy com- 
mand line. With the wcopy wild-card com- 
mand. I need only enter 

wcopy /hO/C_programs/*.c /dO 

All filenames with the extension . c are then 
copied from the C_PROGRAMS directory on 
the hard drive to the floppy. 

The four wild-card commands included 
are wcopy. wdel , wattr and wmatch. These 
commands are similar to copy. del. attr 
and dir. respectively. Each wild-card 
command performs flawlessly. I had only 
one slight "problem" with these commands 
— the ability to wipe out an entire group of 
files by accidentally typing wdel *. While 
the documentation warns you several times 
that you could wipe out an entire directory 
this way, there should be some type of 
confirmation when you specify all file- 
names by typing the meta-character by it- 
self. 

wdel and wmatch are stand-alone pro- 
grams, while wcopy and wa tt r require copy 
and attr and fail if they are not present in 
your execution directory. 
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The directory structure commands al- 
low you to map your directories and sort 
filenames, otree and dtree allow you to 
build a road map of your directories, otree 
graphically represents the directories on a 
device, such as your floppies or hard drive, 
dtree allows you to specify just a subdirec- 
tory with the option of including filenames. 
Both commands work fine, except for one 
small problem with dtree when you use the 
- f option. If a directory or file is renamed, 
and the new name is shorter than the original, 
dtree gives you the new name with the 
additional characters left over from the old 
filename. If the old name was 
real_1ong_name and the new name is 
short_name. dtree reports the file name as 
short_namename. 

di rsort is just what its name implies — 
a directory-sorting utility that allows for 
ascending or descending sorts. There is an 
option that ' makes subdirectories have 
uppercase letters and filenames have low- 
ercase letters for those who want to stay 
within OS-y standards. 

Four color-manipulation commands are 
included in the utility package. They allow 
for quick changes of the foreground, back- 
ground and border colors, and any of the 
palette registers. Simply type the command 
followed by a decimal number. No need to 



use the display command included with 
OS-9. which requires you to use hexadeci- 
mal codes. 



Wi 



ith Level II 
Tools vou can 
use wild cards 
with the copy, 
del and attr 
commands. 




Three window-handling commands al- 
low you to change the current window type, 
and open and close an overlay window. The 
wconf i g command uses a syntax similar to 
the wcreate command, except it allows you 
to change a window that is already defined. 
The wi ndow command pulls up an overlay 



window complete with border and optional 
title. The wend command ends an overlay 
window created with the window command. 
Both window and wend can be used in 
command files to create impressive dis- 
plays. 

The upcase. locase and dislex com- 
mands are used to alter text files. Upcase 
converts all lowercase characters in a file to 
uppercase, while locase converts all up- 
percase characters to lowercase, dislex 
produces, literally, a mirror image of a file, 
lean see a use for upcase and locase. but 
few uses for di s 1 ex. The manual, however, 
mentions file encryption or just plain fun. 

Two command-file commands, goto and 
pause, are also included. These are useful 
in procedure files to pause the screen with 
a message and to repeat a section of the file, 
goto is limited in that there is no way to 
conduct conditional testing. 

The remaining six tools are listed as 
utility commands, ascii converts any 
character to its proper ASCII value, convert 
allows you to perform base conversions 
between decimal, binary and hexadecimal. 
devname returns the name of the current 
device associated with a device or file. 
Under OS-9 Level II. devname is useful for 
reporting the current window being used. 
calendar is a simple reminder program 



New Programs for Home & Office 



BANKMAN. Continuously updates your checkbook. Save, Edit 
and print (lies. Lets you analyze spending; reconciles, sum- 
marizes banking transactions. Uses 32K. Manual. . . $39.95 

GENERAL STATISTICS. Computes over 50 stats, including 
Standard deviation & error, Covarlance, Correlation, Chl- 
Square and ANOVA. Includes screen tables and manual. Edits, 
Saves and Prints data. User friendly. Has Manual. . . S39.95 

ENVELOPE WRITER. Prints return and mailing addresses dir- 
ectly on the envelope with a DWP or on tractor envelopes with 
a DMP. Saves on labels! Memorizes return addresses. Prints 
with custom fonts on TANDY printers. Uses 16K. . . . SI 9.95 

BASEBALL STATS. Keeps track of 20 statistics. Continuously 
updates. Full of options! Uses 32K. Includes Manual. S39.95 

QUICK STATS. A Baseball Scoreboard! Keeps track of over a 
dozen stats. Lets you save, edit and print out data. . . $24.95 

BALL CARDS. A database for baseball card collectors. .S24.95 

BRAINBUSTERS. Multiple ChoicefTrue-False Test Writing 
program. Lets you Save, Edit, Select, Randomize & Print. 
Many more options! Use professionally or for fun. . . S39.95 

THE EXAMINER. Use with above program to take "On Screen" 
tests. Grades and Saves results. For home or class. . . $24.95 

TRIVIA 1-3. Try these BRAINBUSTER quizzes. Each. . $10.95 

COCO LABELS. Sets up alphabetic screen index. 32K. . $29.95 

CALCULATOR PROGRAM. Unique! Prints out data. 16K. $14.95 



Specify COCO 1, 2 or 3. 
Disk Only. Send check or 
money order. Add $3.00 
Shipping/Handling. 
Illinois Residents add 
6.25% Sales Tax. 



TRADING POST 



DISTRIBUTORS OF 
5-STAR SOFTWARE 

P.O. BOX 3453 

CARBONOALE. IL 

62902 




MptiaSoftivare'lecfinologks 



£jY£ Data- Windows £*& 

Thii is the ultimate database package for the COCO. System features include user definable 
fields, multiple key fields, automatic soiling. fast searching, browsing, user definsble edils. user 
dcfinsble windows (database views), import/export/merge. cut/copy/pasle, snd even report snd 
msiling lsbel generation fscililies. Makes full use of Mulli - Vue. bui docs not require il lo ran! 
Multi • Vue style interface mskes it Easy 10 use! Sl?k OS9 level II Required 559.95 J 



£*£J Data - Merger ■£*££ 

Easily create personalized msil-raerge documents for your client/customer database, create 
invoices for your small business. Many capabilities include conditional printing, conditional 
print blocks, page formatting, repeating blocks, and more. Can be used with your favorite 

word processor for ultimate printing control. 5 12k QS9 Ixvcl II Req uired 519.95 

^^^"""^^^^^^^^^^^^Prvsso^Parljicr^^ 



All-ra «* RAM R"i*M arflware la the COCO, belli*. No* Pad. calculator, calendar, alarm, amo-dial 
phone hook, clock. OS? command macros and nu»cl Rum in the background! 512k OS? Led I] Rcq.-_529.95 




Utilities 


Communications 




Level 11 Toob 
25 Great tooU lo make your OS9 life eiwer. CompVeie 

wildcard, directory Hw, and wirvilowingcornrriarids 

help beginrrn tod eiperu alike! 

12Hk OS9 Level D Required--....-. — —.-$24.95 


OS9 Level II BBS 

Oocnpieie system cornea ready to run Uac the built 
tn setup or create your own. Completely cusioinue- 
■blt. Feaiures:X/Y Modem, keywrorda. unlimited 
meaaage base*. ANSI graphics, aee Vic board while 
.trans, and more! Sl» QS9LDReq $29.9$ 

Warp - 1 

Coropkie terminal program includes Auto- Dial/ 
Macro, X A Y modem, ANSI graphics, buffer cap- 
ture, chal mode, inner, and morel 
51 2k OS9 Level D 1 RS 232 Pak Req.__$34.95 




Disk Manager Tree 

No more fighting with cample* directary • trucluree, 
end long path name*. Uae window* to view, ocas, 
copy, and delete fika and dure lonea with aingle 
keystrokes! 512k OS9 Level D Required-. -.$29.9$ 

The Zipper 

Patchca anything! Patch commands on disk, patch 
the OS9Boot (ik. Fia CRCa. tavc lost file*, fit 
duka. 64k OS9 Level, or IIRe-i $19.95 

Multi-Menu 

Create your own pop-down mcnua easily! Run any 
OS9 program from the menu. No propamnung 
required! 51 2k OS9 L H A Muln Vue Req.._$19.95 




Hardware 




Contra - 4 

On an incredible 4 serial parts in 1 PAK1 Corned four 
mooetnarpnnien at onccl Connect a Microsoft (PC) 
mousel Special pulaod WQ prevents lockups- Comes 
wimnavroibiig software losbarepenphcralsl Perfect 
foratmUiuneBBSICOCOlRoq $124.95 u 




f (504)649-5176<vo.ce) <VQ£) ajpha Software TechnnloR.es G£S*J P**)b49-SW. (BBS) 
[pi UN ^dS30DSh n .r«Aii«ndi.r< 210 Blue field Dr. Slide!!. I .A. 70458 coDO«to,« M n»« M . 
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that allows you to update or list current 
reminders. 

With browse, you can look through a 
text file using the arrow keys to scroll 
forward and backward. Since browse uses a 
fixed buffer, it cannot read more data than 
the size of its buffer. This makes the pro- 
gram good only on files equal to or smaller 
than the size of its buffer. The remaining 
command is mmap which prepares a graphic 
map (using Xs and Os) of the memory in the 
computer. 

The manual included with this package 
is 30 pages long. It shows the proper syntax 
for each command along with some ex- 
amples. There is an introduction by the 
author along with installation procedures 
for moving the utilities to your working 
floppies or hard drive. 

The package contains 25 utilities for a 
cost of S24.95. This amounts to just under a 
dollar per utility. Given the limitations of 
some utilities and the cost per utility, this 
package is a fair bargain. 

(Alpha Software Technologies, 210 Blue- 
field Drive. Slidel I. I.A 70458; 504-649-5176; 
S24.95, plus$3S/H) 

— Carmen Izzi, Jr. 



Game 



CoCo3 



Caveman 

In the year 2061. after the great war had 
decimated the human race, only a few 
pockets of humanity survived. Among those 
people were Evil Lord Dracus and a sage 
named Kubai. Lord Dracus is now busy 
repopulating the world with Robodroids. 
creatures half human and half machine, 
which threaten the few remaining villages. 
This world is without leadership and on the 
brink of chaos. It is felt that only Kubai can 
lead the remnants of mankind back to a 
civilized life. Unfortunately. Dracus had 
Kubai kidnapped and il is up to you. who 
seek adventure, to locate Kubai and return 
him to the village. 




That is the scenario, but let's look at the 
actual game. Caveman is of the platform- 
arcade genre in which you play the warrior 
who has to work his way from one side of 
the screen to the other by jumping or reach- 
ing various plateaus and exiting each of 20 
game screens. To impede your progress. 



aveman is of the 
platform-arcade 
genre in which you 
play the warrior 
who has to work 
his way from one 
side of the screen 
to the other by 
jumping or 
reaching various 
plateaus. 



mines are placed throughout each cave. 
Some of these mines are in plain sight while 
others are invisible. There are three ways to 
rid passages of mines. One is to drop one of 
60 pieces of dynamite onto the mines. The 
second is to simply stomp on a mine. And 
the third way is to run into it. The last 
method, however, causes your warrior 
damage or death and is not recommended. 

There are keys, piles of gold, bottles of 
magic potion, and mystery treasure chests 
scattered throughout the caves. The gold 
adds energy points, which are the warrior's 
health indicators. Each warrior starts off 
with 10 energy points and must forfeit one 
of his four lives should that energy reach 
zero. Potions allow the warrior to see the 
hidden mines, but only for a split second. 
Treasure chests either deduct or add energy 
points. While mapping is not really neces- 
sary, you may want to note where each door 
in the later stages leads, as some take you 
back to previous screens. 

Caveman is a machine-language game 
that requires a C0C0 3 and a joystick, pref- 
erably die two-button type. The game comes 
on two flippy disks (that is. two disks and 
four sides). Disk switching is necessary 
throughout the game. The graphics are fair, 
although not crisp or very detailed. An RGB 
monitor is recommended. Play is easy and 
relaxing as the game is not timed and there 
are no moving objects to contend with. 

There are a few minor items that could 



improve the game. While it does not effect 
play, it would be helpful to have each cave 
or level displayed on the screen so players 
know how much progress has been made. A 
final screen listing points, previous scores, 
and how far a player has gone when the 
game ends would also be a nice touch. 
Randomizing the location of keys, mines, 
and gold would improve the game — each 
game would then be a new adventure. So. if 
you are looking for a fast-paced, shoot- 
*em-up game. Caveman will be a disap- 
pointment. However, if you often do not get 
past the first screen with other games, this 
will be a joy. It can be successfully com- 
pleted within an hour. 

(J.T. Rawlinson Software, #361 St. Ger- 
main Ave., Toronto, Ontario M5M 1W6 
Canada; 4l6-782-22l7evenings only; $14.95 
plus$3S/H) 

— George Aftamonow 



Music 



CoCo3 



SoundTrax 
Instrument Disks 

I recently reviewed SoundTrax, a sound- 
sequencing program for the C0C0 3 from 
Sundog Systems (January 1991. Page 76). 
On the back of the SoundTrax program disk 
are several instrument and sound files from 
which to pick and choose. 

Although there were a few dozen of 
these voices to use in recordings, their scope 
was somewhat limited. For instance, the 
guitar voice sounded good, but its one oc- 
tave range was restricting. Similarly, the 
drum samples sounded a bit stale after 
hearing the exact same thud or cymbal 
crash over and over. What the program 
needed was a wider variety of samples. 

Sundog Systems has come to the rescue 
with supplemental instrument-set disks. 
There are three different sets, each with 
approximately 40 sound samples. Each set 
comes on one "flippy" disk. These are not 
stand-alone programs — you do need the 
SoundTrax program to use them. 

One criticism I have is that related in- 
strument samples aren't all on the same set. 
If your favorite instrument is the piano you 
need to buy sets one and three. If you're 
laying down a drum track and doing drum 
rolls, then decide you'd like to use the open 
and closed hi-hat sounds, you'll find the 
samples are on two different sets. How 
about some organization? Put all drum 
voices on one disk, all voices for piano on 
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7 Color 

Printer! 




The New Generation 
of SlE®!^ Printers 



RAINBOW 

NX-1020 

This next generation color printer sets new 
standards in color printer performance... 
225 cps, 4 NLQ fonts including Script, plus 
a new high speed draft font; but the 
enhancements don't stop there. Add a 16k 
buffer, a special quiet mode, top feed, 
bottom and rear tractor, and the list goes on. 
Seven on-demand colors, 8 color graphics 
modes, Epson and IBM emulation for 
maximum software compatibility. Virtually 
everything desired in a printer is here - 
speed, color and versatility al an affordable 
price with a 2 year warranty. 

OUR PLUG W GO FOR THE COCO 
SYSTEM INCLUDES: 

• NX-1020 Rainbow Multi-Font 
Printer 

• Blue Streak Ultima 

• Software Support 
Disk" 

• Color Screen Dump 
Utilities 

'+$10SfiTpwng 
& Insuran 




$24995 

+S10 Shipping 
& Insurance 

COMPLETE 



All Dayton Associate's products have a 

30 day moneyback guarantee. 

All printer systems are 

"Plug "n" GofortheCoCo". 



Epson 1$ a registered trade mark ol Seiko Epson Corp. 

IBM ts a registered trade mark ot International Business MacOtnes Corp. 

Price and Specifications are suDiect to change without notice 



NX-1001 

MULTI-FONT 

This enhanced version of the 
legendary NX-1000II is the 
latest low-cost high- 
performance printer from Star 
Micronics. Fully featured with 
4 NLQ plus a draft 
font. 10 
character 
sizes from 
subscript 
to 

quadruple 
size, 4k 

buffer, 180 cps, 
friction and tractor feed, 
and much much more. Backed by a 2 
year warranty. Epson and IBM emulation 
modes for maximum software 
compatibility. A performer so versatile 
you may never exhaust it's creative 
possibilities. 

OUR PLUG W GO FOR THE COCO 

SYSTEM INCLUDES: 

• NX-1001 Multi Font Printer 

Blue Streak Ultima 

Software 

Support Disk** 

/^S10Ship>«ig 



The Smallest, Sleekest, 
Fastest Serial To Parallel 
Converter You Can Buy! 

7 Switchable Baud Rates 
300* 600 •1200* 2400* 4800 
• 9600*19200 



R1.L 




*m* 



$188 88 

+S10 Shipping 

COMPLETE 



"The Software Support Disk 

A Dayton Associates exclusive that comes 
with any printer purchase. It consists of a 
C0C0 Installation Tutorial, a C0C0 Graph- 
ics Screen Dump Utilities and a Control 
Code Tutorial. Provided to help you get the 
most out of your system! 



Use this "smart" cable to con- 
nect a Centronics parallel 
printer to any version C0C0 or 
use it to improve performance 
of your current printer. The 
cables are long-life, high 
quality shielded cables 
with moulded plugs for 
extra durability. 



The Blue 
Streak Ultima 



Powered version 
add $6.00. 




FREE l 

with purchase ol any 

NX-1020 or 

NX-1001 System 



Order Your System Today... Call (5 13) 885-5999 



DAYTON ASSOCIATES'^, INC 

9644 Quailwood Trail • Spring Valley, Ohio 45370 

Shipping charges to Canada, PR.. HI, AK, APO, FPO are double. Triple charge to all other countries 



Visa & Master accepted within 

the continental U.S. 

Ohio residents add 6.5% sales tax 

COD add $3.00 



one disk, and scatter miscellaneous sounds 
throughout. Of course, if you buy all three 
sets you can configure your instruments 
any way you deem fit. but this is no excuse 
for their present state. 

Another minor flaw is with the identifi- 
cation of the sample files. On the screen and 
in the program manual, the files have eight 
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these instrument-set 
disks makes 
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attractive and viable 
sound-sequencing 
alternative. 



letter filenames. It would have been nice 
had the author expanded on filename de- 
scriptions in the manual. I'm still not sure 
which instrument is represented by the 
filename MGTRBNT3. 

Loading in all of these new samples 
could take a lot of time. Thoughtfully, 
though, Sundog Systems has provided 
Config files that load samples into memory. 
There are six Config files, one for each side 
of the three instrument disks. 

After sampling the new voices, you'll 
hear how much these new files add to music 
compositions. You now have greater flexi- 
bility with your musical creations. Instead 
of the sparse drum accompaniment, create 
full drum backbeats with the new tom-tom. 
cymbal, snare, hi-hat. and bass drum 
samples. 

If you like guitars, you're in for a big 
surprise. The supplemental disks provide 
over 20 new guitar sounds. There are also 15 
acoustic and electric piano samples. Some 
of the other instruments included are the 
bassoon. English horn. oboe, recorder, flute, 
whistle, woodblock, bongo, jingle bell and 
steel drum. Some humorous voice samples 
of laughing, sneezing, and a crowing rooster 
aroused a chuckle. With over 100 new 
samples, there is a little something for 
everybody to enjoy. 

If you already enjoy using SoundTrax, 
just wait until you get these sets. As with the 
original sample files, the sound quality of 
the new sets is surprisingly good. And 
remember, if you still don't have that unique 
sound you've been looking for. it's possible 
to create samples with Studio Works and 



other similar digitizing packages on the 
market. 

My two earlier criticisms of these new 
sets do not effect the sound quality of this 
package in any way, shape, or form. The 
addition of these instrument-set disks makes 
the original program, SoundTrax, a more 
attractive and viable sound-sequencing al- 
ternative. 

(Sundog Systems, P.O. Box 766, Manassas, 
VA 22111; 703-330-8989; $12.95 per set, $29.95 
for all three, plus $2.50 S/H) 

— Tonv Olive 



Game 



OS-9 Level 



Kyum-Gai: To Be 
Ninja — in OS-9 

Many people thought that porting a Disk 
BASIC arcade game to OS-9 while keeping 
the Hi-Res graphics intact would not be an 
easy feat. They never expected anyone 
would do it. If the game in mind were Pong. 
fewer people would have been as skeptical 
of a successful conversion. But. the game 
was not Pong, it was Kyum-Gai: To Be 
Ninja. Kyum-Gai is u marvel of game pro- 
gramming by Glen Dahlgren. About a year 
ago Glen announced his plans to port his 
game to OS-9. The CoCo community waited 
patiently. 

Word was that Kevin Darling was mak- 
ing headway with the project, but previous 
commitments left him precious little time 
for working on Kyum-Gai. Kevin managed 
to get the bulk of the conversion process 
behind him, Glen, who wanted to get this 
landmark achievement on the market as 
soon as possible, found another program- 
mer to fix the remaining loose ends. The 




final touches to the port were added by 
Eddie Kuns. I take my hat off to Kevin 
Darling and Eddie Kuns for their marvel- 
ous accomplishment. 

Kyum-Gai — OS-9 requires a 5I2K 
(actually. 256K minimum) CoCo 3 running 
OS-9 Level II. Due to Tandy licensing re- 



strictions, an OS-9 boot file is not included 
on the Kyum-Gai disk. You need to boot 
OS-9 before playing this game. 

Even this OS-9 neophyte had no prob- 
lems loading the game. All that is necessary 
is that you create and move to a VDG win- 
dow, set the data and execution directories, 
and enter ninja. Loading instructions and 
hard drive installation are clearly explained 
in the manual. 

After the title screen credits you are 
greeted by the same real-time Hi-Res graph- 
ics animation and digitized sounds made 
popular by the original version. Simply put. 
there is no difference. For further informa- 
tion on game play, refer to the original 
review (December 1989. page 92). 

The benefits of using the OS-9 version 
speak more for the operating system itself. 
You can multitask and have Kyum-Gai 
running in up to three windows on a 512K 
CoCo 3. Of course, you probably won't 
want to play three games simultaneously, 
but you get the idea. When you switch 
windows, the game automatically pauses 
until you return. 

Perhaps this game offers another step- 
ping stone for CoCoists who hesitate to 
delve into OS-9. This program has finally 
proven that fast-action arcade games are 
possible in the OS-9 environment. Sundog 
hopes Kyum-Gai spawns similar attempts 
of Disk BASIC/OS-9 version games. 

(Sundog Systems, P.O. Box 766, Manassas, 

VA 221 1 1 ; 703-330-8989; $29.95, plus $2.50 S/H ) 
— Tonv Olive 



Audio Tape 



Mystical Data 

About l o years ago I experienced a proj- 
ect in San Francisco called Audium — an 
experiment in sound-sculptured space. 
People sat in a darkened room and listened 
to computer-generated sounds. The sounds, 
heard through a surround-sound speaker 
arrangement, created a presence of emotion 
that lent itself to vivid imagery. 

Mystical Data, although different in the 
sense that there is distinguishable instru- 
mentation, lulls the listener into the realm 
of imagination as well. 

Mystical Data is a cassette tape recorded 
by Michael Milazzo. Using some high-tech 
musical equipment in conjunction with a 
Color Computer 3 sporting CoCo MIDI 3. he 
has produced a high-quality product. 

The first track. "Lunar", produces a sense 
of floating in a zero-gravity environment. 
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The changes are subtle in this relaxing tune. 
Piano, drums, and synthesizers dominate 
the track. It flows on and on. producing a 
spacewalk feeling. 

"Dragonslair"'. the next track, starts with 
a medieval opening. I immediately thought 
of dark, foreboding castles and stealthily 
journeying deep into the corridors of a 
cavernous mountain in search of the fair 
maiden who might be found resting on a 
treasure in the dragon"s bane. There is a 
clock-like tick, or drip, throughout — very 
reminiscent of trickling stalactites — which 
lends a certain urgency to this song. 

"Equinox", a more reflective passage, 
pulsates and sounds like a march. This one 
reminded me of the band Latitude, who use 
a Fairlighl to achieve a similar calming 
affect with their music. 

"Renaissance" begins with liquid bells 
and eerie wind swirls. This song sounded a 
bit more futuristic than charms from the 
days of yore. Though, again, the music is 
relaxing and a good source of soothing 
pleasure after a hectic day. 

"Excursion", track number five, is aptly 
titled. The piece travels through three peace- 
ful thematic ideas before returning to the 
main theme and gently fading away. All of 
the tracks on Side One should lower your 
blood pressure and set your mind at ease. If 



I had to categorize Mystical Data, it would 
fall somewhere in the New Age/Easy Lis- 
tening music arena. 

Side Two brings us to "Round Table 
1990". At first I thought of a ballroom dance, 
but a flute or woodwind sound followed by 
electric brass changed the imagery to a 
woodland, or possibly a road leading to or 
from a modern-day Camelot. The fanfare 
hinted of a procession. Again, the winds of 
change swirled. Although there were no 
bird chirps or leaves falling. I felt this to be 
an autumn or winter song. This one put me 
in a reflective state. 

"Moondrone", steady tapping of the high 
hat gets this hypnotic drone going. Don't 
expect any keyboard outburst (ala Emer- 
son, Lake and Palmer) here. Instead, this 
piece provides more introspective passages, 
like those on Side One. 

"Midnight Frost" has a haunting feel, 
much like the movie soundtrack to Mid- 
night Express. The use of flutes and the 
overall rhythm make this piece sound 
somewhat Eastern in nature. 

"Into the Light", the finale, opens with 
the tickling of keys and a seminary choir's 
lament. This piece has more discernable 
breaks and bridges. The changes were re- 
freshing. My only criticism of this piece is 
thai it is too short. 



All songs on Mystical Data were con- 
ceived, performed, recorded, engineered, 
produced, and packaged by Michael Mi- 
lazzo. Here is a list for those wondering 
what equipment he used for this recording: 

Kawai K-l 
Roland MKS-100 
YamahaFB0l.RXl7, RI00 
Vestafire and Boss digital and analog 

delays 
Tandy CoCo 3 with CoCo MIDI 3 
Real-time sequencer software 
Tascam 244 Mixer, A2300SX 

'/4-track deck 

Mystical Data is soothing mood music, 
not necessarily "elevator music" or Muzak. 
As I stated earlier, these songs will proba- 
bly lower your blood pressure and help 
drain tensions. So. if you're going crazy 
tuning your radio dial past the screaming 
whammy bars and techno-pop garbage that 
has all but monopolized the airwaves, sit 
down with a cup of hot tea and take a load 
off with Mystical Data. 

I Rulaford Research, P.O. Box 530328, San 
Diego, CA 92153; 619-690-1181; $9.95) 

— Jamie Hensen 



* ATTENTION 

* CHESS LOVERS & STRADEGY GAMERS* 
TAKE NOTE 

Game Gem Games Announces 
POWER PIECES 
The Epic of Conquest 
for a 51 2K CoCo 3 
"Experience the thrill of:moving* 
, attacking, reconnaissance * 
and distance attacking * 
all scaled to chess board size* 
Save and load games 
no two games the same 
Splendid point and click 
environment and all for 

ONLY $19.95 

* Send Check or Money Order to. 
Game Gem Games 
P0 Box W 
Clarksburg, WV 

26301 
*checks allow 2-4 weeks delivery* 

* Sorry no COD's * 

* 51 2K CoCo3 1 Disk Drive * 



PRICES SLASHED ON ALL 

ADOS PRODUCTS 

LIMITED TIME ONLY! 

EXTENDED ADOS-3 $29.95 

(Requires ADOS-3) 

Disto real-time clock driver. $5. 

Adapter for controllers lacking 28-pin ROM socket, $10. 

ADOS-3 $24.95 

EXT. ADOS-3 PLUS ADOS-3 $49.95 

SMARTWATCH REAL-TIME CLOCK ....$29.95 

Usable in controllers with 28-pin ROM socket, or in ROM pack, 
$10. Includes OS-9 Level II driver. Ext. ADOS-3 driver, $5 with 
clock, $10 separately. 

ADOS FOR CoCo 1 and 2 $14.95 

— All ADOS software is sold on disk with configuring utilities that 
generate an EPROMable binary tile. Information is provided for 
having an EPROM burned by mail for $15. 

— See our earlier ads. and reviews in July 1987 and October 1989 
Rainbows (available on request) for product descriptions. 

/V 11111 N. Kendall Dr. 



Spectrosysjemst^^^- 



Suile A108 
Miami. FL 33176 
(305) 274-3899 



PLEASE ADD S2 SHIPPING • NO DELAY ON PERSONAL CHECKS 
WE CANNOT ACCEPT CREDIT CARDS 
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The following products have recently been received by THE RAINBOW, examined by 
our magazine staff and issued the Rainbow Seal of Certification, your assurance 
that we have seen the product and have ascertained that it is what it purports to be. 



Super Comics+. an improved version of Comics*. 
The new version features an improved window for the 
pencil, an inverted box instead of fill-box. expanded 
hand (Gel/Put ) options, a 5 1 2K RAM-disk, two-color 
painting, improved error handling for the CoCo 3. a 
utility for customizing clip art. six picture files, and a 
new expanded 24-page manual. Requires a CoCo 2 or 
3. a disk drive, a self-centering joystick, and a DMP- 
1 05/1 07 or DMP- 1 30/ 1 34 printer. E.Z. rricndly. 118 
Corlies Avenue. Poughkeepsie. NY 12601; $21.45 
plus $1.50 SHI. Owners nfCOMICS+ may upgrade 
for $14.45 plus SIH, 



Picture Bingo, a program requiring aColorComputer 
3. disk drive, mouse or joystick, and DMP- 1 05/1 07 or 
DMP- 1 30/134 series printer. This program creates 
picture bingo cards and acts as the "caller" for the 
game. A Speech/Sound Cartridge may be used with 
this feature. Picture Bingo is fun for young children, 
has an educational application in helping students 
leam a foreign language and would make for a unique 
"party" game if the cards used personalized pictures. 
E.Z. Friendly. 1 IS Cotlies Avenue. Pnughkeepsie. NY 
12601; $19 .95 plus $1.50 Sin. 



NIB Compressor, a graphics compressor for the 
CoCo 3. N/Ballowsyou to save your hscreen pictures 
in a compressed format. NIB was used in the creation 
of CoCo Gallery on Disk for THE RAINBOW. Fea- 
tures include palette save, automatic save, fast com- 
pression, and fast loading. Use this as a stand-alone 
program or in conjunction with Gallery Maker. Rick's 
Computer Enterprise, P.O. Box 276. Liberty. KY 42539; 
$2 JO plus $2 SIH. 



Gallery Maker, now you can create a personalized 
CoCo gallery on disk with your pictures and this 
program. Gallery Maker organizes your pictures, 
graphics data, and background information into a 
beautiful art gallery. Each finished gallery consists of 
eleven NIB pictures, a menu driver, and support files 
necessary to make the gallery complete. Require- 
ments are a CoCo 3. a disk drive and an RGB or CMP 
monitor. Rick's Computer Enterprise, P.O. Box 276. 
Liberty. KY 42539; $10 plus $2 SIH. 



Crystal City, a 1 28K/5 1 2K space-arcade game requir- 
ing a CoCo 3, a joystick, and a disk drive. It is the first 



commercial product to use the CoCo 3's horizontal 
hardware scrolling. Try loevadc the evil overlords and 
penetrate level upon level of defenses to get close 
enough to free the enslaved people of the Crystal City. 
Written by Jeremy Spiller. author of Xenix. Available 
from Sundog Systems. P.O. Box 766. Manassas. VA 
22111; (703) 330-8989: $34.95 plus $2.50 SIH. 



CyberVoice. a versatile phoneme-based speech syn- 
thesizer using the Votrax SC-02 chip set. It offers 
independent control of the speech rate, pitch, pitch 
movement rate, amplitude, articulation rate, vocal 
tract filter response, and phoneme selection and dura- 
tion. Included is a unique text-to-speech server pro- 
gram for the CyberVoice. This program executes in 
the background, cooperating with the CyberVoice 
device drivers, to translate ordinary English text into 
CyberVoice commands. Compatible with Speech 
Systems' SuperVotce. Requires a CoCo 3 and OS-9 
Level II. Burke & Burke. P.0 Box 733. Maple Valley. 
WA 98038; 1800) 237-2409; $74.95 for Speech Syn- 
thesizer wl OS-9 software: $24.95 for software only: 
plus $3 minimum SIH. 



N*Banner. a banner-creating program requiring a 
CoCo. a 35-track disk drive, and a printer. Works on 
a 32, 40. or 80-column screen. Four fonts to choose 
from; Standard. Gothic. Digital and Standard Bold. 
Options include printing in double wide mode, using 
different graphics block codes, and selection of 600- 
9600 baud. Johnson Software. 5803A Reinke. 
Crestview. FL 32536; $9.95. 



Caveman — In Quest of Kubai. graphics arcade 
game requiring a CoCo 3. an RGB monitor, a disk 
drive, and a two-button joystick. In the year 2061 . after 
the great war. the human race has been destroyed, and 
only a few survivors remain. One of these survivors, 
the Evil Lord Dracus. has created a new race of 
robodroids. part machine, part human, that threaten 
the village and the good people of the land. In order to 
Htvc humanity, you must rescue Kubai, the great wise 
man and professor, who is being held hostage in the 
underground caverns. J. T. Rawlinson Software. U361 
St. Germain Avenue, Toronto, Ontario, M5M IW6. 
Canada: $14.95 plus S3 S/H. 




The Seal of Certification is open to all manufacturers of products for the 
Tandy Color Computer, regardless of whether they advertise in THE RAIN- 
BOW. 

By awarding a Seal, the maga/ine certifies the program does exist — that we ! 
have examined it and have a sample copy • — but this does not constitute any 
guarantee of satisfaction. As soon as possible, these hardware or software 
items will be forwarded to THE RAINBOW reviewers for evaluation. 



. 
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Wrapping 
the RAINBOW 



Unwrapping the rainbow 



Long lime, no hear from, eh? The 
purpose of "Wrapping the RAIN- 
BOW" is to address changes in the 
magazine and other aspects of pro- 
duction that affect you. When I 
have nothing to report. I would rather free 
this page for other material. So. then, what 
do I have to report'.' 

Starting with last month's issue (March 
1991 ). we stopped using the plastic Sitma 
wrappers on THE rainbow. In making this 
decision, we looked at the history of our 
sending wrapped copies of the magazine. 
The original decision to "poly-bag" THE 
RAINBOW was in response to reader com- 
plaints about magazines getting destroyed 
in the mail. The number of complaints was 
relatively low: however, our goal is to serve 
you — so. on with the wrappers. But. to 
make a long story short, the complaints 
continued. 

We have tried several approaches to 
solve the problem, none of which were 
really effective. The post office offered 
many explanations for how this destruction 
might occur, but few point to anything 
other than careless handling. In our case, it 
doesn't appear the Sitma wrappers have 
much effect on this. So. our new way of 
handling the problem is to go back to the old 
way --we'll replace unusable copies of the 
magazine that have been destroyed in the 
mail. The difference is that we'll also be 
putting the buck where it belongs, so to 
speak. 

We have contacted the postal service 
and received assurance that they will do 
what they can to ensure proper delivery. If 
you receive a copy of THE RAINBOW you 
cannot read, let us know. We'll immedi- 
ately fire off letters to the local and destina- 
tion postmasters, the PostmasterGeneral of 



the United Slates and the congressional 
representatives involved. In short, we'll be 
making a nuisance of ourselves any lime we 
(or you) are not satisfied with the service. 
You should do the same. A big portion of 
the money you pay for a subscription to THE 
RAINBOW goes toward postage, which in- 
creased nearly 22 percent this February. So 
do let us know, but you complain to your 
postmaster, too. Every magazine we ship 
leaves here in good condition. In the mean- 
time, we'll continue to serve those readers 
who encounter problems. 

This doesn't mean we will never use the 
Sitma wrappers again. The plastic bags 
allow a greater number of options to adver- 
tisers. They are also very useful should we 
want to send supplemental information. 
But our experience has shown that using 
them as a regular course of action is not an 
effective means of ensuring you get your 
RAINBOW in good shape. 



Our mail bag shows an increase in the 
number of questions being asked about OS- 
9. To handle the increase, we have decided 
to publish a new question/answer column 
in the magazine. "OS-9 Hotline" is intended 
as an open forum for your questions. It is 
our hope this column will provide a 
smoother entry for those just starting with 
OS-9. But we'll accept queries from inter- 
mediate and advanced users, too. While we 
don't guarantee we'll know all the answers, 
we'll give it our best shot and try to steer 
you in the right direction. Send your OS-9- 
related questions to OS-9 Hotline, c/o THE 
RAINBOW. P.O. Box 385, Prospect. KY 40059. 



- Cray Augsburg 
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Continued from Page 6 

RAINBOW had ihem. However, since their 
advertisements no longer appear. I have no 
idea if they are even still in business. That 
company was Datamatch. Inc.. in Redford. 
Michigan. 

I finally resorted to making my own 
Hippy disks. In addition to the second notch, 
it is necessary to punch a second index 
timing hole. To do this, it is necessary to 
measure and mark the exact location (on 
both sides of the disk I of the second hole. (It 
is simple enough to find this spot by refer- 
ring to the existing index timing hole. The 
new one is on the opposite side of the large 
center hole.) Then, using a single-hole paper 
punch, carefully punch a hole in the plastic 
cover. Do not punch the magnetic disk, or 
you will ruin it! Also, be careful not to 
handle the disk, don't even let the punch 
touch it if you can possibly avoid it. Punch 
the second hole on both sides of the disk 
cover. 

I have been very successful in making 
my own flippy disks with this method. I am 
sure there are several experts who advise 
you not to do it. but the method works. It is 
like having twice as many disks as you had 
previously. 

I might also advise you should be sure 
the disks you buy are DSDDdisks. Although 
the SSDD disks can be altered to become 
flippy disks, the manufacturer guarantees 
only the one side to be top quality. In other 
words, convert the SSDD disks at your own 
risk. 

I hope this information helps Roger and 
anyone else who may have had the same 
problem. I strongly feel that, as readers of 
n Hi RAINBOW, we need to come to the aid of 
one another. As Radio Shack seems to be 
phasing out our beloved CoCo. we need 
THE RAINBOW and each other. 

Ii is obvious that THE RAINBOW and its 
various advertisers are doing their part. Let 
us hope that we are doing ours. Keep the 
CoCo alive! 

Bill Swart: 
Washington. D.C. 

To the best of our knowledge, no data 
exists regarding the effects of rotating a 
disk in both directions las must he done 
withjiippies). It would seem that dirt picked 
up by the disk while going one way could be 
imbedded in. or scratch, the disk when 
moved in the opposite direction. In a in- 
case, we recommend caution and common 
sense should anyone decide to follow this 
practice. 

Printer Selections 

Editor: 

Since the DMP-107 replaced the DMP-106 



in Radio Shack's printer line, some CoCo 
users have been trying to use graphics soft- 
ware by selecting DMP-106 printer drivers. 
As it turns out. this does not work. 

The DMP-107 Tandy Graphics modes 
seem to be the same as the DMP- 1 30, not the 
DMP-106. Zebra's CoCo Graphics Designer 
Pins. Label Designer, and First Prize all 
give excellent results using the DMP-130 
printer driver for the DMP-107 printer. 

DMP-107 owners will, no doubt, find that 

DMP-130 printer drivers on other vendor's 

graphics software also support their printer. 

Stewart Newfeld 

President. Zebra Systems. Inc. 

State College. Pennsylvania 

Many thanks for the tip. Stewart. 

A Helping Hand for Home Publisher 

Editor: 

I received my January issue of THE RAIN- 
BOW this week and, as usual, began by 
reading the "Letters to THE RAINBOW". I 
would like to reply to Douglas Bacon and 
Sanccria Thomas. 

I have Home Publisher and have run into 
many of their problems. Though my system 
has more on it than either of their descrip- 
tions, the key factors are the same: I have a 
CoCo 3 and a DMP- 1 33 printer. Both Doug 
and Sanceria can solve most of their prob- 
lems by reading Appendix E in the manual. 
Home Publisher comes with the driver for 
a DMP-I3x installed. The x is because this 
driver works in the Tandy mode for the 1 30, 
130a, 132. and 133. Doug's problem stems 
from the fact that the printer (not the soft- 
ware) is limiting him to two columns of the 
three-column mode and creating a problem 
with the single-column mode. According to 
the information in a file referenced by 
Appendix E, Doug should cure his problem 
by setting the printer to Tandy mode, IBM 
character set, setting the printer to take 
advantage of his parallel interface and in- 
stalling the DMPibmn printer driver. (Read 
on for installation information.) If he wants 
to continue using the DMP-I3()n driver and 
the serial interface, there are special set- 
tings for the single-column mode to coax it 
into working with this printer driver. (See 
the file AppendE on Side 2 of the original 
disk.) 

Sanceria' s problem may come from 
having the DMP- 1 30 driver installed when in 
fact the DMP- 1 05 driver may need to be 
installed. To find out which driver is cur- 
rently installed, and to change it as re- 
quired, click on the Options area. Next click 
System Set-up. Then click Printer Defini- 
tions. Finally, click Printer Driver. A small 
window opens, stating the current driver. If 
you've changed nothing since purchasing 
the software, it will be the DMP-I30n driver. 



Below this window another window opens. 
This contains the menu of available drivers. 
Click on the appropriate driver as men- 
tioned above. The software now changes 
the file that sets up the system when you 
boot the software. Unless I have misguessed. 
this should cure the problems with Home 
Publisher, oral the very least cause it to run 
in a more predictable manner. 

Sanceria's second problem is trying to 
gel the Color Computer to act as a type- 
writer. Even though there have been pro- 
grams published as One-liner entries in THE 
RAINBOW that accomplish this conversion. 
I can never find the one I want when I need 
it. I agree that what Sanceria is really look- 
ing for is a word processor. An OS-9-based 
text editor or word processor would allow 
direct importation of text into Home Pub- 
lisher. As an exercise in learning why text 
editors and word processors cost what ihey 
do, and to meet Sanceria's staled goals, 
type in the program on Page 191 of the 
"Color Computer Extended BASIC" man- 
ual. Then flip the page and follow the in- 
structions on Page 192 that modify the pro- 
gram to output to the printer rather than the 
screen. This allows very limited editing (as 
long as you edit before you press ENTER) 
and allows printing of text to the printer 
without having to imbed the text in data 
statements. 

Good luck to both of you. One last 
comment to Sanceria. When you meet 
someone (or something) new. the relation- 
ship cannot be as friendly as it becomes 
once you become better acquainted. As the 
Editor replied, "hang in there." Read the 
manuals, try the examples, and above all 
give yourself the time to learn. Don't you 
let that fire of eagerness turn to frustration. 
Relax! The dawn will come if you just keep 
at it. 

Alan J. Wagner. Sr. 
Quakertown . Pennsylvania 



jow welcomes letters to the 
tor. Mail should be addressed to: 
Letters to Rainbow, The Falsoft Build- 
ing, ro. Box 3KS. Prospect, kv 40059. Let- 
ters should include the writer's full name 
and address. Letters may be edited for 
purposes of clarity or to conserve space. 
Letters to the editor may also he sent 
to us through our Delphi CoCo sit;. From 
the CoCo sk;> prompt, type RAJ to take 
you into the Rainbow Magazine Serv- 
ices area of the SMS. At the RAINBOW* 
prompt, type I. f r to reach the t,K1 TKRS> 
prompt and then select Letters for Pub- 
lication. Be sure to include your com- 
plete name and address. 
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and smell the CoCo! 




Bringyour drawings and ^MH^b p!^' 

designs to vivid, colorful .^PJffiE^L- Get Max-10- the CoCo ^^__^ 

life with the amazingly ^EfjjTJ^C' u ' or dp rocessor thafs ^fcf&Ty^ 

popular CoCo Max III! pttflfl* fun and furiously fast! m*-- : / 

/.(.. ml Rotate! Animate! 1 3 Fantastic fonts! 40 paint^^^W^ Get that easy-as-pie Macintosh feel without giving 

brush shapes! CoCo Max III dazzles the eye! (let crisp, clear picture reso- up your first-born! This program will stretch your CoCo to the limit. Mix 

lution ( WO full hires 320* 192 screens I ' . a big, big edit window ... 28 graphics, text, large headlines, arrange multiple columns, you name it . . . 

eai-vour-heart-out" drawing tools. Route at miniscule 1.5° angles. Max- 1(1 will swiftly oblige. Includes paper-saving full-page preview 

I ndo'boo-txx>s with a click. .Animate for special effect. Pick'n'choose from ( graphics, too! ) to make your prose look proud. This is the CoCo word 

16 colors out of 64. Go absolutely fruity' with fonts (8 sizes, 5 styles & processor dial will leave you speechless. Printers supported: Epson FX, 

more available! ) and an astounding -lO'different brush styles! No wonder MX. RX. LX and compatibles; D.MP 105. 106. 130: CGP 220 ( B&W ); OKI 

this software is recognized is the CoCo community's all-time favorite! 182. 92, 192; STAR NX- 10, NX- 1000. 

\\>>rk>\vith both 128Kdntl =il Jh. r..i|»ir> print in S shade^of^nn I'riniiTs supported Ma\ IftAdli-ftrK 

Epson RXFX.MX.LX and compaubles; Star. Genuiu NX- 10. XX- 1000; I)MPI(X). 105. " . * . „ r u-i oat i- . « <M/i ox 

UX> HO I20, 130, 200; 0H82A, 182, 192 CGP-220(B&W), Max- 10 Fonts 36 super fonts on 2 disks. Call for list !>ow$14.9b 

„ ' " . m . ."■ ^ Sp* 11 Checker 35.000 word dictionary. Online spell checking 

CoCo Max ill Ada-Ons l0 make vou ioo k me perfec, professional $1 4.95 

Max Fonts disks; 95 fonts on 4 disks Now only $29.95 

Or two sets of two disks each $14.95 

Max Edit Ik' font editor as creative as your imagination Only $14.95 DUV OOW COLO MUX III __ ._ 

Color Printer drivers NX- 1000 Rainbow. CGP-220 and / ... ,/i -^it'ltl >' 

Okimate20. For glorious color that wins hands down! $14.95 uriUMIMrlU 

Call 1-800-221-0916 1-203-656-1806 

HOW to order: Use Visa, Mastercard or M.O.CO.D. add ,WX) extra. Purchase Orders ^hh^^ 94? West Avenue 

subject to cn^tapprovdGmnectkiU residents add 8% sales tax. Shipping kOO per order, [COLORWARE ' , TnAO0 , 

usually IPS ground. ITS 2nd day air $6.00 extra. Next day service available. Canada: ^^^■^■^■1 Utinetl, C I UOdJU 
$6.00 per order ( Airmail ). Outside U.S. & Canada add 1 0"" of order total. 






or over 10 years. THE RAINBOW 
has been bringing RAINBOWfest 
lo the CoCo Community. Being our 
20th consecutive show, this 
RAINBOWfest promises to be a show to be 
talked about for time to come. 

Come and walk the aisles — set your 
own pace between visiting the exhibits and 
attending the many invaluable, free 
seminars. Take part in the seminars offered, 
ranging in topics from BASIC to the sophis- 
ticated OS-9 operating system. 

Stop by the RAINBOW booth and meet 
the faces behind THE RAINBOW. As well, 
those who are written about throughout its 
pages will be there to meet you and answer 
your questions. While you're at the 
RAINBOW booth, you can also take 
advantage of the reduced prices on the 
entire RAINBOW bookshelf. In addition, 
prices on all back issues will be reduced, 
giving you a chance to fill those holes in 
your library. You'll also meet many other 
people who share your interest in the Color 
Computer. RAINBOWfest is a person-to- 
person event, not to mention a tremendous 
learning experience in a fun and relaxed at- 
mosphere. 

While you're walking through the 
exhibit hall, keep your eyes open for CoCo 
Cat. Children and adults alike always enjoy 
the furry feline. And our mascot is no 



dummy — always looking for great deals, 
perhaps CoCo Cat has a hot tip for you. 

RAINBOWfest is the place where 
commercial programmers show their 
newest programs and hardware for the first 
time. Plus, they will be listening to your 
comments and offering "special show 
prices." RAINBOWfest Chicago, is the 



Show Information 

RAINBOWfest - Chicago 

Dates April 26-28. 1991 
Hotel - The Hyatt Regency - 
Woodfietd, Sehaumburg 

For more info, call toll free 

1 (800) 847-0309 

in KY, call 1502) 22H-4492 



place to gel information on the capabilities 
of the CoCo, and find a terrific selection of 
the latest CoCo products. In exhibit after 
exhibit, there will be demonstrations, 
opportunities to try software and hardware, 
and special RAINBOWfest prices. 

If you missed the fun at our last RAIN- 
BOWfest, why don*t you make plans to 
join us in Chicago? For those members of 
the family who don't share your affinity 



toward the CoCo (for reasons we will never 
understand), there are many other attrac- 
tions in the Chicago area. 

Once again we are pleased to be 
holding RAINBOWfest at The Hyatt 
Regency-Woodfield, Sehaumburg. Illinois. 
The show opens Friday evening with a 
session from 7:00 p.m. to 10:00 p.m. It's a 
daytime show Saturday - The CoCo Com- 
munity Breakfast (separate ticket required) 
is at 8:00 a.m. sharp, and the exhibit hall 
opens promptly at 10:00 a.m. and runs 
through 5:00 p.m. On Sunday, the exhibit 
hall opens at 1 1 :00 a.m.. and the show 
closes at 3:00 p.m. 

Tickets for RAINBOWfest may be 
obtained directly from THE RAINBOW. 
We'll also send you a reservation form so 
you can get a reduced room rate at the 
Hyatt Regency. 

The POSH way to go. You can have 
your travel arrangements and hotel reserva- 
tions handled through RAINBOW- 
affiliated Posh Travel Assistance. Inc., of 
Louisville. For the POSH treatment many 
of our exhibitors enjoy, call POSH at (502) 
893-331 1. All POSH services are available 
at no charge to RAINBOWfest attendees. 

If your ticket order is one of the first 
five orders received from your state, you 
will receive a Free RAINBOWfest T- 
Shirt! 



COCO COMMUNITY BREAKFAST 



KEYNOTE ADDRESS Chris Burke. Burke & Burke 

Color Computing has been the ultimate adventure tor Chris Burke, who chose the wild 
and unknown territory of the Color Computer over the mediocrity of other computer 
markets. Take a trip down memory lane and discover how we'll build future memories 
as Chris offers his insights on why working with the Color Computer is so fun and 
rewarding. So come and join the excitement with Chris and the Rainbow staff at the 
CoCo Community Breakfast! 



COCO SEMINARS 



Cray Augsburg 

RAINBOW Managing Editor 
Behind the Rainbow 

Kevin Darling 

OS-9 Users Group. President 
05-9 Q&A Open Forum 



Art Flexser 

SpectroSystems 

Adding Features to the BASIC ROM 

Marty Goodman 

RAINBOW Contributing Editor 
CoCo Consultations Live 



Mike Knudsen 

Author of UltiMusE 

Music & MIDI Advancements 

Eddie Kuns 

Rainbow Contributing Editor 
Delphi Bureau Live 



EXCLUSIVE RAINBOWfest 
SEMINAR 

OS-9 68K Open Forum 
Ed Gresick 

Delmar 

Frank Hogg 
Frank Hogg Laboratory 

Paul Ward 
Interactive Media Systems 

Greg Law 

RAINBOW Technical Editor 

Breakpoint Live & 

OS-9 For Absolute Beginners 

Eric Wolf 

Rainbow Contributor 

Graphics Applications for the CoCo 



YES! I'm coming to Chicago! I want to save by buying tickets now at the special 
advanced sale price. Breakfast tickets require advance reservations. 



iplease prim) 



Address 

City 

Telephone 
Company 



State 
Zip 



Three-day ticket(s)@ $9 each total Name. 

One-day ticket(s) @ S7 each total 

circle one: Friday Saturday Sunday 

Saturday CoCo Breakfast (S S 1 3 each total 

RAINBOWfest T-shin(s) @ S6 each total 

circle size: S M X XL 

(T-shirts must be picked up at the door) 
Handling charge S I + $L0O 

TOTAL ENCLOSED $ 

(U.S. Currency Only. Please) 
□ Also send me a hotel reservation card for The Hyatt Regency 
Woodfield (S69. single or double room). 

Advance ticket deadline: April 12. 1991. Orders received less than two weeks prior to show opening will be held for you at the door. Tickets will also 
> be available at the door at a slightly higher price. Tickets will be mailed six weeks prior to the show. Children 4 and under, free: over 4. full price. 
Make checks payable to: RAINBOWfest. The Falsoft Building. 9509 U.S. Highway 42. P.O. Box 385. Prospect. KY 40059. To make reservations 
by phone, in Kentucky call (502) 228-4492. or outside Kentucky call (800) 847-0309. 



J Payment Enclosed 

■J VISA □ MasterCard 3 American Express 

Account Number 

Exp. Date 

Signature 



GET 'EM WHILE 
THEY'RE 



BACK ISSUES STILL AVAILABLE 

Have you explored the wealth of information in our past issues? From our very first, four-page issue to many with more than 300 pages 
of material, it's all just for CoCo users — a great way to expand your library! 

A WORLD OF INFO AT A BARGAIN PRICE 

All back issues sell for the single issue cover price. In addition, there is a $3.50 charge for the first issue, plus 50 cents for each additional 
issue for postage and handling if sent by United Parcel Service. There is a $5 charge for the first issue, plus a $1 charge for each additional 
issue on orders sent by U.S.Mail. UPS will not deliver to a post office box or to another country. 

MOST ISSUES STILL AVAILABLE 

Available issues through June 1982 are provided on white paper in a reprint form. All others are in regular magazine form. VISA, 

MasterCard and American Express accepted. Kentucky residents please add 6 percent sales tax; Canadian residents, 7 percent GST. 

In order to hold down costs, we do not bill, and no C.O.D. orders are accepted. 

Due to heavy demand, we suggest you order the back issues you want now while supplies last. 

To check availability and order, review and fill out the form below and mail it with your payment. 

For greater convenience, order through the Rainbow Magazine Services area of our Delphi CoCo SIG. 



RAINBOW INDEX 

A complete index for, July 1 981 through June 1 984. is printed in the 
July 1 984 issue. Separate copies are available for $2.50 plus 50e han- 
dling. 

Indexes for subsequent years are published annually in the July 

issues Of THE RAINBOW. 

TOTAL 

KY RESIDENTS ADD 6% 

CANADIAN RESIDENTS ADD 7% GST _ 

U.S. MAIL CHARGE 

SHIPPING & HANDLING _ 

U.P.S. CHARGE 



TOTAL AMOUNT 
ENCLOSED 



Article Reprints 

In instances where a given issue is now out ol print and not available lor 
purchase, we do provide photocopies of specific articles. The cost for this service 
is $1 .50 plus 50 cents S/H per article. This service is provided only in the case ol 
out-of-stock issues 

Name 

Address 

City 



State 

j Payment Enclosed, or 

Charge to my: J VISA _i MC J AE 

CARD # 



Zip 



EXPIRATION DATE 
SIGNATURE 



PHONE | 



TO ORDER BY PHONE (credit card orders only) call (800) 847-0309. 
8 a.m. to 5 p.m. EST. All other inquiries call (502) 228-4492. 



send to: 

THE RAINBOW 
The Falsoft Building 
P.O. Box 385 
Prospect, KY 40059 



Please send me the following back issues: 





VOLUME 1 






MAY 87 


Printer 


$3.95 


J 


JUL 81 


Premier Issue 


$2.00 


J 


JUN87 


Music 


$3.95 


-i 


AUG 81 




$2.00 


J 


JUL 87 


Anniversary 


$3.95 


J 


NOV 81 




$2.00 


a 










FEB 82 




$2.00 


j 




VOLUME 7 














AUG 87 


Games 


$3.95 


J 




VOLUME 2 






SEP 87 


Education 


$3.95 


-i 


JUN83 


Printers 


$2.95 


j 


OCT 87 


Graphics 


$3.95 


-i 










NOV 87 


Data Comm. 


$3.95 


J 




VOLUME 3 






DEC 87 


Holiday 


$3.95 


-i 


AUG 83 


Games 


$2.95 


j 


JAN 88 


Beginners 


$3.95 


-i 


SEP 83 


Education 


$2.95 


j 


FEB 88 


Utilities 


$3.95 


J 


OCT 83 


Graphics 


$3.95 


a 


MAR 88 


Business 


$3.95 


J 


MAR 84 


Business 


$3.95 


j 


APR 88 


Home Help 


$3.95 


J 


APR 84 


Gaming 


$3.95 


j 


MAY 88 


Printer 


53.95 


J 


MAY 84 


Printer 


$3.95 


j 


JUN88 


Music 


$3.95 


J 


JUN84 


Music 


$3.95 


j 


JUL 88 


Anniversary 


$3.95 


J 


JUL 84 


Anniversary 


$3.95 


j 




VOLUME 8 








VOLUME 4 






AUG 88 


Games 


$3.95 


J 


AUG 84 


Games 


$3.95 


j 


SEP 88 


Education 


$3.95 


J 


SEP 84 


Education 


$3.95 


'j 


OCT 88 


Graphics 


$3.95 


J 


OCT 84 


Graphics 


$3.95 


j 


NOV 88 


Data Comm. 


$3.95 


J 


NOV 84 


Oala Comm. 


$3.95 


j 


DEC 88 


Holiday 


53.95 


-J 


DEC 84 


Holiday 


$3.95 


j 


JAN 89 


Beginners 


$3.95 


-i 


JAN 85 


Beginners 


$3.95 


j 


FEB 89 


Home Help 


$3.95 


-i 


FEB 85 


Utilities 


$3.95 


j 


MAR 89 


Hardware 


$3.95 


J 


MAR 85 


Business 


$3.95 


j 


APR 89 


Business 


$3.95 


J 


APR 85 


Simulations 


$3.95 


j 


MAY 89 


Printer 


$3.95 


J 


MAY 85 


Printer 


$3.95 


j 


JUN89 


Summer Fun 


53.95 


J 


JUN85 


Music 


$3.95 


Q 


JUL 89 


Anniversary 


$3.95 


j 


JUL 85 


Anniversary 


$3.95 


-1 




VOLUME 9 








VOLUME 5 






AUG 89 


Beyond BASIC 


53.95 


□ 


AUG 85 


Games 


$3.95 


J 


SEP 89 


Education 


$3.95 


J 


SEP 85 


Education 


$3.95 


J 


OCT 89 


Graphics 


$3.95 


J 


OCT 85 


Graphics 


$3.95 


J 


NOV 89 


Data Comm. 


$3.95 


3 


NOV 85 


Daia Comm. 


$3.95 


a 


DEC 89 


Holiday 


53.95 


J 


DEC 85 


Holiday 


53.95 


□ 


JAN 90 


Beginners 


53.95 


J 


JAN 86 


Beginners 


$3.95 


Q 


FEB 90 


Home Help 


$3.95 


j 


FEB 86 


Utilities 


$3.95 


□ 


MAR 90 


Hardware 


$3.95 


J 


MAR 86 


Business 


$3.95 


j 


APR 90 


Business 


$3.95 


J 


APR 86 


Home Help 


53.95 


a 


MAY 90 


Printer 


$3.95 


□ 


MAY 86 


Printer 


$3.95 


D 


JUN90 


Summer Fun 


$3.95 


j 


JUN86 


Music 


$3.95 


a 


JUL 89 


Anniversary 


S3.95 


j 


JUL 86 


Anniversary 


$3.95 


j 




VOLUME 10 








VOLUME 6 






AUG 90 


OS-9 


53.95 


Q 


AUG 86 


Games 


$3.95 


j 


SEP 90 


Education 


$3.95 


CI 


SEP 86 


Education 


$3.95 


j 


OCT 90 


Graphics 


$3.95 


3 


OCT 86 


Graphics 


$3.95 


Q 


NOV 90 


Data Comm. 


$3.95 


a 


NOV 86 


Data Comm. 


$3.95 


J 


DEC 90 


Holiday 


53.95 


j 


DEC 86 


Holiday 


$3.95 


J 


JAN 91 


Beginners 


53.95 


j 


JAN 87 


Beginners 


$3.95 


J 


FEB 91 


Home Help 


53.95 


j 


FEB 87 


Utilities 


$3.95 


-J 


MAR 91 


Hardware 


53.95 


□ 


MAR 87 


Business 


$3.95 


a 


APR 91 


Business 


53.95 


a 


APR 87 


Home Help 


$3.95 


j 











Advertisers Index 



We encourage you to patronize our advertisers — all of whom support the Tandy Color 
Computer. We will appreciate your mentioning the rainbow when you contact these firms. 



Alpha Software Technologies .. 69 

Burke & Burke ,. 45 

Cer-Comp 37 

CoCoPro 33 

Coless 57 

Color Systems 

Colorware 19 

Colorware 

Computer Plus IFC 

CRC/Disto 53 

Dayton Associates 

ot W.R. Hall. Inc 

Delmar Company 41 

Eversof t Games. Ltd 

Frank Hogg Laboratories 82 

Game Gem Games 73 

Granite Computer Systems 48 



Hawksofl 39 

Hyper-Tech Software 57 

Interactive Media Systems 13 

Interactive Media Systems 15 

iw T Enterprises 49 

Microcom Software 5 

. rocom Software 7 

MiUsoftCo i 40 

Musicware 47 

NRI 43 

Owl-Ware 25 

Owl-Ware 26 

Owl-Ware 27 

PCM Magazine 55 

Peripheral Technology 35 

Rainbow Back Issues 80 

Rainbow Binder hi 



Rainbow Bookshelf .. 65 

Rainbowfesl 78 

Rainbow-Test 79 

Rainbow on Tape and Disk ...... 9 

Ramco 15 

Rick's Computer Supply 63 

Robert Offerman 59 

SD Enterprises 49 

Spectro Systems 73 

Sundog Systems -.. IBC 

T&D Software 17 

T&D Software 67 

Tandy BC 

[rading Posl <>'> 

/.lira Systems 13 





Call: 

Belinda Kirby 

Advertising Representative 
(502) 228-4492 





□ Call: 

Kim Lewis 

Advertising Representative 

(502) 228-4492 



The Falsoft Building 
9509 U.S. Highway 42, P.O. Box 385, Prospect, KY 40059 

FAX (502) 228-5121 
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FULL SPECTRUM 

Compare the TOMCAT - See the POWER 



TC9 



^TC70 



->TC K-68000 



->TC K-68030 



CoCo3 



MM1 Mac 



Mac II 



Mac llx 



TOMCAT, the FULL SPECTRUM computer that can be everything you want it to be! 
NEVER OUTDATED! - NEVER OBSOLETE! -AVAILABLE NOWH* 



SOFTWARE, HARDWARE AND ACCESSORIES FOR THE TOMCAT AND COC03 



HARD DRIVES FOR THE COCO 

(FULL 1 year warranty!!) 
Burke & Burke 20 meg hard drive 
with 40 MS Fast Drive! $459.95 

Burke & Burke 30 meg hard drive 
with 40 MS Fast Drive! $499.95 

Burke & Burke 40 meg hard drive 
with 28 MS Fastest Drivel $559.95 

Burke & Burke XT Interface $69.95 

Burke & Burke XT RTC Interface 
(Real Time Clock) $99.95 

Burke & Burke XT ROM 
Auto Boot OS9 $19.95 

The Eliminator 20 meg hard drive 
system with 40 MS Fast Drivel $849.95 
The Eliminator 40 meg hard drive 
system with 28 MS Fastest Drive! $949.95 
The Eliminator (2 RS232. 1 Parr, 
Hard/Floppy disk interface) $1 1 9.95 

Battery backed Real Time Clock 
for The Eliminator $30.00 

Western Digital WD1 002-05 hard 
& floppy controller for Eliminator $299.95 
Memory 

Populated 51 2K and software $98.00 

512K bare board $29.95 

1 MEG bare board $159.95 

Populated 1 MEG $199.95 

512KforTC9 $49.95 

Populated 1 MEG for TC9 $109.95 

SLOT-PACK III by Chris Hawks 
(3 Slot Multi-Pak replacment) $94.95 

12volt adaptor for Slot-Pack III $19.95 

KEYBOARD 101 keys w/click $69.95 

CoCo 3 PC keyboard adaptor $94.95 

Keyboard and adaptor $159.95 

MAGNAVOX 1CM135 analog with 
stereo sound and high grade com- 
posite screen - 640 X 240 resolution 
at 12 Mhz with .42 dot pitch. 
($14 ship) $298.00 

Cable for CC3 (not req. for TC9) $1 9.95 
Teac 40 Track double sided drive $99.95 
Teac 720K/1 .2 MEG 5.25 drive $99.95 

Teac 720K/1 .2 MEG 3.5 drive $89.95 

5.25 Bracket for 3.5" Teac drive $1 2.95 
MISC. 

5.25" Disks 25 for $10.00 

3.5" Disks 25 for $15.00 

Mini Tower Case with 200 watt 
power supply for the TC9 $1 59.95 

AB Switch two printers etc on 
one serial port (DB25 or DB9) $29.95 

GIMI Chip for CoCo 3: $34.95 

68B09EChlp: $14.95 

Zoom 2400 Modem: $129.95 



SOFTWARE 

The WIZ communications with 
windows for RS OS9 (SALE!!) $59.95 
FBU file backup for hard disk 
RS OS9 $35.00 

FBU file backup for hard disk 
OS9/68000 (Includes 6809) $50.00 
DynaStar 3.5 powerful, menu- 
driven word processor for RS OS9 
(NEW VERSION) $99.95 

DynaSpell easy to use spelling 
checker for RS OS9 only $1 9.95 

UPGRADE to DynaStar 3.5 - 
OS9 Lll $25.00 

OS9/68000 $50.00 

DynaStar 3.5 powerful, menu- 
driven word processor for OS9/68000 
(NEW VERSION) $149.95 

IMS Information Management 
System is a powerful and flexible 
database and application 
development system for 
RS OS9 (SALE!!!) $99.95 

IMS Information Management 
System is a powerful and flexible 
database and application 
development system for 
OS9/68000 (SALE!!!) $299.95 

Super Sleuth examine/modify 
binary programs for RS OS9 $50.00 
Super Sleuth examine/modify 
binary programs for OS9/68K $1 00.00 
TOP DISKS 15 720K Disks 
PD software for OSK (35 MEG 
when decompressed!) $50.00 



PC Utility lets you copy files be- 
tween OS-9/68k and MS-DOS $99.00 
R.S.B. Run Radio Shack 
Basic under OS-9. $39.95 
OS-9 User's Group disks $6 ea 
or $99 for all on 1 1 720K disks 
QCom communications package 
for OS-9/68K. Free with TC70 $150.00 
EZGEN 1.08 Bootfile editor 
NEW VERSION! $19.95 
HYPER I/O 

Run RSDOS on hard disk $29.95 

MVCanvas Graphics editor for OS9 
and Multi-View $49.95 

ShellMate point and click file 
management for OS9 $24.95 

Alpha Data-Windows 
Database for OS9 $59.95 

Alpha Data-Merger mail-merge $19.95 
Alpha Presto-Partner 
DAs for OS9 $29.95 

Alpha Level II Tools 

25 great utilities lor OS9 $24.95 

Alpha Disk Manager Tree $29.95 

Alpha The Zapper 

Patch anything for OS9! $19.95 

Alpha Multi-Menu 

Pop down menus for OS9 $1 9.95 

Alpha BBS for OS9 

Complete system ready to run $29.95 

Alpha Warp - 1 

Terminal program for OS9 $34.95 

BOOKS 
OS9 INSIGHTS 

(The only book on OS9/68000) $44.95 

A Full Turn Of The Screw $19.95 



SEE 
THE 
TC9 
AND 
TC70 
AT 
THE 

CHICAGO 
'FEST 



ORDERING INFORMATION 



VISA and M/C, check and C.O.D. Contential U.S. software shipping add 
$5.00 Ground - $8.00 Two Day Air. Hardware add $15 ground - $27 Two 
Day Air. Please call for Next Day Air costs and C.O.D. Foreign add 10% 
Shipping (Minimum $5 USD). NY residents please add 7% sales tax. 



Since 1976 

204 Windemere Road 

Syracuse, NY 13205 

FAX 315/469-8537 




Call 315/469-7364 
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Better men Iran you nave tailed the guest, but the Hand ot me good 
princess Thelda Is too mucti to resist! Stolen Dv the evil necromancer 
Divlnax, ehe has been secreted tar tram prying eyes and n is now up 
10 you to regain the oleces ot Ihe mystical Lite Force and save lire tail 
lady The Quest lor Thelda is an outstanding arcade program mat 
combines action and adventure to bnng you an incredible vidBO game 
playing experience Travel throughout over 500 different screens 
searching lor magical objects and spells, lighting horrible creatures 
and gathering the various parts ol the Life Force guarded by evei- 
increasing terrors. You'll en|oy Ihe highest quality 320*200 resolu- 
tion 16 color graphics and digital sound effects that you've come to 
expect from Sundog Systems The game play Is fast and furious, and 
only you can rescue the princess and complete the LEGEND OF 
THELDA! Reg. 128K CoCo 3. disk 
drive, and |oystlcK (2-bu!lon 
joystick supponedi 

Hint book now available tor Thelda' Contains dues, maps, and even 
a BASIC program to modlly your own characters 1 S4.95 



in the year 267 1 . a mysterious ob|ect landed on Earth, heralding Ihe 
alien invasion ol the Red Falcon. Only two courageous soldiers nave a 
hope ot stemming this alien infestation. Armed with your military 
training and the latest weapon technology, you and a friend roust 
light back the horde. Sundog Systems presents our second 5I2K 
game. The Contra* You'll see why we decided to use SI2K on mis 
prelect 1 Amazing graphics with 320x225 resolution. 16 color hill 
screen animation and horizontal smoom scrolling! Background digital 
sound effects and real-time music 1 One or two player action AT THE 
SAME TIME 1 You'll agree that this is one ol the best arcade games 
yet lor your 512K CoCo 3. Needless to say. playing hero won't be 
easy: playing The Contras will he 
tougher 1 Req 512K CoCo 3, disk 
dnve. and 2-outton joystick 



$34.95 



$34.95 



The superior technology ol the evil Overlords has ensnared yet 
another innocent planet, however, this one contains the Crystal City, 
bastion ot democracy and independence. Earth has had enough! 
Break through level upon level of their virtually invulnerable 
delenses. deteat the end guardians, and make your way ever closer 
to freeing the slaves ol the Crystal City 1 This amazing arcade game is 
an achievement in us own rigni. Full 128K/5f2K utilization! Super 
fast horizontal haidware scrolling on me 128K computer' Wild digital 
sound effects and background music score' 30 minutes, or over 30 
megabytes ol non-repeating 320x200 testHullon, IB color graphics! 
This game has it all; order a demo disk to see il lirst! Can you save 
the Crystal Cily !rom unbeatable 
loes? Req 128K CoCo 3. disk 
drive, and joystick 



$34.95 
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You've raved about this 5I2K arcaoe 
game! The graphics and animation a--e 
amazing 1 You've got to hear the digital 
sounds! 512K (three disksl packed with 
excitement. 512K CoCo 3 only 834.95 



This martial arts arcaoe game remains a 
CoCo 3 phenomenon. One of our best sell- 
ers lo dale! Play the Incredible combat ex- 
perience that you've been missing, and tall 
lor me availability of the OS-9 version 
128K CoCo 3 action $29.95. 

OS-9 Version Now Available 



ALSO AVAILABLE: 



You have been chosen to pilot the spacecraft wielding the Plutonium 
plasma laser against the netarious insectoids. the Zenlans These 
bugs have been ripping oil me space trade lines tor years: now 
they're about to tind a victim who can light back! Beat back the 
swarm of pests to tneir home planet Zenix. and use the laser to end 
the menace once and tor all. Zenix Is a lightning las! aicade game lor 
the I28K CoCo 3. The 320x225 16 color graphics are amazing, as 
are the digital background music score and effects, all on a 128K 
computer' The tast action and game play will astound you in this 
GALAGA ol extermination Plug in your joystick and strap in lor the 
rida of your life" Call to order a demo 
disk to see the action before you 
buy! Req 128K CoCo 3. disk drive, 
and joystick 



Hall ol the King 1. 2. or 3 

CoCo 1-3 $29.95 ea. 

Hall ol the King Trilogy $74.95 



White Fire ot Eternity 

CoCo 1 - 3 

Dragon Blade 
CoCo 1 - 3 



Kung-Fu Dude 
CoCo 1 - 3 



This 128K/512K sound sequencing system 
has become an immensely popular pro- 
gram. Create musical scores using poly- 
phonic digitized sounds and a user-friend- 
ly point and click editor. Call lo order the 
SoundTrax demo program, and gat 10% oft 
your purchase with receipt. $34.95 

Now Available: SoundTrax instrument sam- 
ple disks! Guitars, strings, woodwinds, 
and iusl plain weird instruments lor your 
composing pleasure. Completely compati- 
ble with the SoundTrax system 3 Hippy (2 
sides) disks lull ot sounds. S12.95 each or 
S29.95 tor all three 



$24.95 



S19.95 



$19.95 



$29.95 



-Visa. Mastercard. Check. Money Order, and COD 
(USA only, please) accepled. All loreign orders 
musl be senl in US currency Money Orders include 
$2.50 lor shipping in USA and Canada $5.00 
Foreign. $3 00 extra for COD orders PA residents 
add 6% sales lax Dealer inquiries welcome 
Authors we're looking lor new software' 



$19.95 



S24.95 



Champion 
CoCo 1 - 3 

Paladin's Legacy 
CoCo 1 - 3 

Warrior King 

CoCo 3 $29.95 

In Quest of the Star Lord 
CoCo 3 $34.95 

Hint Sheet $3.95 
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We've 
Moved! 



P.O. Box 766 
Manassas, VA 22111 
703/330-8989 





MICKGY5 

SPACE ADVENTURE 




,,. . ... L.. .— 



NOW 



WINNIE THE POOH 

i "the hundked acre wood 




DONALD DUCK'S 

PLAYGROUND 



Buy any CoCo software tide at half price... 
and get a second program for only $ 5! 




It's true! Bring the attached coupon to your local Radio 
Shack. Then when you purchase any Color Computer 
software title in stock— at half the regular price— you can 
pick one of these eleven great titles on the list for just five 
dollars more! Choose from popular CoCo titles — exciting 
action and strategy games, personal finance and other 
productivity tools, challenging and fun educational pro- 
grams for all ages. It's a double deal you can't refuse! 




Choose from These 
Fine Bonus Packages: 

□ DONALD DUCK'S PLAYGROUND, 26-3245 
J MICKEY'S SPACE ADVENTURE, 26-3247 
c DUNGEONS OF DAGGORATH, 26-3093 
o PERSONAL FINANCE n, 26-3106 

□ WINNIE THE POOH, 26-3244 
o MICRO-MISSION, 26-3271 

□ GFL FOOTBALL, 26-3172 

□ COLOR FILE II, 26-3110 

□ SHANGHAI, 26-3084 

a SOKO-BAN, 26-3161 
THEXDER, 26-3072 



